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To write an adventure program, youneed 
to know a bit about the language BASIC. 

“| Youcanstill have fun with this book, 
though, without knowing any BASIC, by 
Mol typing in and playing the game Haunted 

"1 House which was written specially for it. If 
“| you want to learn or improve your BASIC, 
there are two Usborne books to help you: 
Introduction to Computer Programming 
and Better BASIC. 













About this book 


Writing an adventure game from scratchis 
quite a daunting task, especially if youare 
new to computer programming. This book 
allows you to start as gently as you like by 
giving you an adventure listing which you 
can type in and play, change and add toas 
muchas you like, or use as askeleton 
program for your very own adventure story. 
The game written for this book is called 
Haunted House and you will find the main 
listing for it on pages 33-38. This will work 
onany computer which uses Microsoft- 
style BASIC, including BBC, Dragon, Oric, 
TRS-80 and expanded VIC 20, and has 
changes to make it work ona 48K Spectrum 
(Timex 2000). A special ZX81 (Timex 1000) 
version of the game is listed on pages 39-45. 
Tum straight to these pages if you want to 
play the game before you find out howit 
works. It isa specially good idea to do this if 
you've never played an adventure game. 





If youare used to looking at program 
listings, you will probably pick up afew 
} clues about how the game works as you 
type it in. To avoid this, you could try to 
| persuade someone else to type it in for you. 
; As the program is so long and 
complicated, you will need to type itin 
extremely carefully. It is worth typing 
slowly and checking each line as you go, as 
“you only need do it once. You can save the 
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On pages 6-15, you will find out how to 
plan an adventure and on pages 16-27 how 
to structure and write the program forit. 
You may find this section quite difficult. 
Don't worry if you do, just work through 
each bit slowly and carefully until you feel 
you have grasped the ideas in it, then goon 
to the next bit. 

As you work through these pages it isa 
good idea to write a practice game of your 
own, following each step carefully. Don't 
worry if itisn’'ta specially good game; it will 
help you to understand how the program 
works and see the problems you need to 
solve in order to write an adventure. A good 
adventure needs careful planning to make 
itinteresting and exciting to play. 
Remember, you don't need to touch your 
computer until you have planned your 
game down to the last detail. 

You will find some extra tips and hints on 
adventure writing on page 46, and on page 
47 there are answers to the puzzles set inthe 
book. 

After playing Haunted House afew 
times, you will probably want to make 
changes to it. Pages 28-31 give yousome 
ideas for producing your own version. 






Whatare the rules? 


If you have played an adventure game 
before you will know what to expect 
from Haunted House. If youhaven't, all 
you need to know is that the computer 
will ask you what you want to do and you 
tell it, using not more than two words. 

It is a good idea to pick up anything on 
the way that looks valuable or useful and 
to try using these things in any way you 
can think of to solve the problems you 
encounter. Type SCORE to find out how 
many points you have and if you have 
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What is an adventure game? 


An adventure game is like a story in which 
the player is the hero. Unlike a book, where 
the sequence of events is fixed, an 
adventure game is different each time itis 
played because the player chooses what 
happens at each stage. By giving the 
computer instructions in response to 
descriptions which appear on the screen, 
the player goes ona dangerous journey into 
an unknown land. The aim is to survive 
whatever dangers may arise and return 
with treasures. 


The first adventure game was written in 
1976 ona mainframe computer at Stanford 
University in the U.S.A. by William 
Crowther and Don Woods. It is often 
referred to as Colossal Cave, Colossal or 
just Adventure, anda version of it isnow 
available for most home computers. It was 
written in the scientific computer language, 
Fortran, which, unlike BASIC, cannot 
handle words. All the data for the game 
had to be indexed and stored on disc. 

The first people to play adventures were 
computer professionals, as home 
computers did not exist. A version of 
Crowther & Woods’ adventure is still 
included with most large business 
computer systems to show people who are 
not used to computers that they canbe 
“friendly”. These disc-based adventures 
often occupy more than 250K and are very 
complicated to play. 


Micro adventures 


There have been many adventures since 
this first one. Perhaps the most famous are 
those written by Scott Adams, an American 
programmer who was the first to producea 
version of Adventure for a small micro. This 
was Adventure Land for the TRS-80. Other 
Scott Adams’ adventures to look out for are: 
Pirate Adventure, The Count and Pyramid 
of Doom. 


The term “adventure” is now used to 
describe a wide range of different games. 
The game inthis book is a traditional text 
adventure based on the Crowther & Woods 
type of game. The player takes the leading 
role in the story, but he is not givena set of 
attributes as in role-playing games. The 
player uses his own intelligence, cunning, 
and so on, not those of a character assigned 
to him at the beginning of the game. Like 
chess, traditional adventures are “mind” 
games, involving puzzle-solving rather than 
quick reactions or chance. 


Graphics adventures 


The original adventure did not use any 
graphics, relying instead on the player's 
imagination to conjure up the monsters and 
other terrors that make up the game. Some 
people think that a game with graphics is 
not a true adventure, though there are some 
very good graphics adventures now 
available for micros. If you have sufficient 
memory, you could add graphics routines 
to your adventures or to the Haunted House 
program in this book. This book does not 
explain how to do this because 
graphics instructions vary so much 
from computer to computer. 


























What kind of program is it? 







































Anadventure program is really a kind of 
database. A database is a computer filing 
system which stores information and 
allows it to be called up ina variety of 
different ways, and it can have all kinds 
of serious uses. An adventure programis 
an “interactive” database. The player 
moves through it, altering or “updating” 
information as he does so. As you work 
through the book, you will see how 
particular words are used as “keys” to 
unlock certain items of information. This 
technique can be used to restrict access 
to certain information ina “serious” 
database. 

Youcan learn some useful 
programming techniques by writing an 
adventure. As the programis sucha 
complicated one, it shows how important 
itis to plan it in detail before switching on 
your computer. It also makes you think of 
all the things a person using the program 
might try to do. If you work out a way of 
making the computer deal with any 
input, however silly, you will be able to 
write programs which don't crash. 

Many of the adventures you can buy 
on cassette are written, at least partly, in 
machine code. This allows more 
information to be packed into the 
Computer and makes the game mun 
faster. If you know a bit about machine 
code, you could experiment with adding 





Turn the page now and start 
planning your adventure 
game. 
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PLANNING A GAME 


Where to start 


When you write an adventure game youare 


inventing a fantasy world where you make 








sort of creatures and things live there and 

what these creatures and things can and 

cannot do. Your world can be an alien city, 
, for instance, or an underground palace 


where elves, wizards and trolls live ora 
mysterious castle which is the home of 
dragons and other strange monsters. It 
could even be atime in the past involving 
actual historical people and facts. 

Many adventures use magic of some 
kind. You can decide how closely your 
world sticks to the mules of the real world 
and how much magic is allowed. Whatever 
¢ you choose to do, try to make sure the rules 


and frustrating. 
Having decided ona theme for your 
adventure world, you then need to decide 


have to escape, or return toa certain place, 
with treasures, or he might have torescue 
someone, or find a secret place anddo 
something there (such as defusing the Mad 
Scientist's Evil Device for Blowing up the 
World). 


Working out the locations 


The areas or rooms through which the 
player moves during an adventure are 
called locations. Later in the book, you will 
see how these are numbered to put themin 
the computer. For the moment, you need to 
remember that the number of locations you 
can have depends on the amount of 


memory your computer has. More locations 


can make the game more interesting, but 
leave you less memory space for 
descriptions of them all. The game inthis 


up all the niles. You decide where it is, what 






$ The next stage is todraw a roughsketch 





* a book. 
are logical or players will find the game silly 


onthe point of your game. The player might 








book has 64 locations with short 
descriptions. 

Alocation can be indoors or outand 
could be aroom, a cave, half way alonga 
passage, an area of forest, the middle ofa 
field, or anywhere else you like. It is best to 
decide on the number of locations early on 
and stick to it, as this affects the whole 
structure of the game. 


Making amap 


map of your world. Itneed not be accurate 
to the last detail but should show the overall 
scale. While you are doing this, think of 
some ideas for good hiding places for Ta 
treasures and other objects that the 
adventurer will need. 

Here is arough sketch map for the 
Haunted House adventure written for this 


kitchen 





staircase FAN) 





Dark hall 





Locked door 


_ Haunted House is set ina weird house 
standing on the edge ofa sheer cliff. Its 
strange twisted turrets loom out of an 
always gloomy sky. No wall seems straight, 
no corner a right-angle. Not surprisingly no 
one lives there —- wellno humanthatis.. . 

People say the richest man in the world 
spent his last days there. Strangely, noone 
ever saw his body... 


Magical 
barrier 





PLANNING A GAME 


Drawing a grid 


















Working out the routes 


Mark the exits from each location on your 
grid, like this. 

Notice that some locations on this grid 
have one-way routes, so the player cannot 
return the way he has come. Make sure 
there are reasons for these if you use them 
in your adventure, even if the reasons are 
magic. In Haunted House the front door 
slams and locks behind the player once he 
has entered, so he cannot go out again. The 


The first stage in turning your adventure 
world into a computer game is to transfer 
your sketch map to asquared up grid. You 
need one square for each location, so for its 
64 locations, the Haunted House game 
needs an 8 X 8 grid. 

This grid will become the master plan for 
your adventure, so make it as large and 
clear as possible. Eventually it will show all 
the locations and the ways in and out of 
them, and all the treasures and objects used 
inthe game. 

Number each location, starting in the top 
left-hand corner. Most computers start 
counting at zero, so use zero as your first 
location number. 


1 
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walls and doorways when you work out the 
routes the player can take, so start by 
pencilling your map lightly onto the grid. 
Label each location with a short 
description, eg “dark cellar” or “dusty 
room’ and then think about the ways inand 
out of each location. The usual way of 


FRONT E ><qW SITTING 
HALL ROOM 
























marking these is to use points of the * be 

compass — north being towards the top of A N ea N 

the page, south down, east to the right and CLOSET FRONT LIBRARY STUDY 
west to the left. _ LOBBY 


By including staircases, ladders or EP dw 


trapdoors in your descriptions, you can use 


E> <w 
















up and down for some of your routes 48 oo ne 0 SLED 
instead of compass points. This makes the 
2 . z FRONT SLOPING 
game more interesting without the need for VERANDAH ~ Hee ee CORRIDOR 
areal 3D grid. ; s Ep 
Ww Ww 
a ma 
s7 A 
N 58 53 E> 
TWISTED PATH PATHBY BENEATH 
RAILINGS RAILINGS TOWER 
EP dw EP dw ED <qw 

















marsh at locations 53 and 54 is also aone- 
way route, because the boat gets stuck. 
How many one-way routes can you think of? 
When you have settled on your routes, ink 
inthe walls and staircases to fit in with them 
and make a chart, like the one onthe right, 
listing the location number, its description 
(this need not be your final version) and 
its exits. You will find this helps enormously 
when you start writing the program. 


SLIPPERY 


WIDE Ep 
DRRSAGE Be STEPS 





TROPHY 
ROOM 





§ To help you see how the information fits into 
<wy the program, you could complete this chart 
37 using the map on pages 14-15 and checkit 


N against the listing on page 37. 
DINING game eNOS se) 
ROOM 












It is possible to construct real 3D 
adventures which are set on several 
levels like the storeys of a house. Todo 
this you need two or more interlocking 
grids. Such games need a lot of memory 
(48K is probably the minimum to make it 
worthwhile) and can get very 
complicated to write. 


STONE » CRUMBLING 
ARCH _ CLIFFTOP 


ED dw ED <w 
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PLANNING A GAME 
Hiding the treasure 


Having mapped out your adventure world, 
you need to come back to thinking about 
what the player has to do init. Inmany 
adventures, the player has to find valuable 
objects of some kind and take them 
somewhere. These could be “real” 
treasures, like gold and jewels, or they 
could be something like secret plans and 
documents, or items of evidence to help 
solve a crime. If the purpose of your game is 
to rescue someone, then count this as 
having one “treasure”. 






You can have general 
obstacles and traps in your 
game too; they don’t all have 
to be linked toa particular 
treasure. Haunted House 
has a marsh for instance. 











Adding “props” 


You need to decide what treasures to have 
and where to hide them. Hiding the 
treasures will probably involve including 
some “props” in your plan. These are 
pieces of furniture, carpets, items of 
clothing and so on which the player can 
open or examine, but which cannot be 
taken away from the location in which they 
are found. Haunted House has a coffinas 
















Setting problems for the player 


Next you must think about the problems the 
player will have to solve in order to find and 
carry away the treasures. The cleverer and 
more original the problems you invent for 
the player, the more interesting the game 
will be to play. The solutions to many of the 
problems will involve other objects which 
the player must find and then use in the right 
way. You will find out about “useful” objects 
over the page. 

Make alist of your valuable objects and 
number them, starting with 1 this time. (You 
will find out why on page 16.) List the 
objects in order of value as this will be 
useful later on for setting up the scoring 
system. This is the start of the list of words 
you want your computer to recognize. 

Make a note of the obstacles to getting 
each treasure too. You might havea 
monster guard, for example, or a mad axe- 
wielding troll. Treasures might be inlocked 
drawers, or in safes. They may prove 
impossible to carry without a container of 
some kind which is hidden elsewhere. On 
the left are some puzzles you can think 
about. 



















: list. 
one ofits props. reas ‘ 
Haunted House TT cats 
objet, object — a 
Some ideas to think about — painting 38 
i ee ring 35 
Can you think of some “treasures” to fit ells 
with these game settings? a bool ee 42 
e 
1. The headquarters of an international 4 gob lls 13 
crime syndicate. scro 18 
me 5 coins 28 
2. A distant planet which is known to be 5 atue 42 
more technologically advanced than st ick 
Earth. 7 andlest! 
8 





3. Asecret scientific research 
establishment. 










Now can you think of some good 
obstacles to getting them? 





‘ 5. Ancient scroll 
6. Bag of gold coins Guarded by bats. 
Youneeda light. 


7. Ebony statue 
You need alight. 


3. Book of magic 
spells 
Hidden in secret 
room behind false 
wall. 


2. Diamond ring 
Hidden in 
coffin. 


Guarded by 
4 i r ical barrier 
4, jewellea ark your “treasures” on your master plan, magic 
path using the numbers assigned to them on your ane locked 
Guarded by paralysing list. Then write the number of the location oor 
spirits and locked next to the object on your list too. (Youcan 
door. only have one object in each location.) 


Detective game puzzle 


Inthis game the valuable objects are: 3. The footprint is in a flower bed outsidea 


1. Single red hair pono, 

2. Brown woollen thread 4. The fingerprints are on the surface ofa 
3. Footprint large table next to the body. They are 

4. Set of fingerprints invisible. 

5. Blood stain eee 
6. Heavy wooden stick 5. The blood stain is on the carpet. 

6. Touching the stick will destroy any prints 


The obstacles to getting these are: : : 5 
which might be onit. 


1. The hair will get damaged or lost if you 
take tap ee ts oe errs ic cor What solutions can you thin! of? There are 


us % 
: » 





PLANNING AGAME 


Useful objects. 


To help the player solve the problems you set, you will have to include sometools, 
weapons and other useful objects in the game. The player must find the appropriate 
objects and use them in the right way to get round the obstacles. You can testthe 
player's ingenuity by not including the most obvious objects. Instead of a key, for 
example, you could include a hairpin or paperclip for opening a locked door. Youcan 
make things more difficult, too, by hiding, say, a torch in one place and the batteries forit 
inanother. The player must find both before he can use them. 

Add your objects to the word list you started for your treasures. Don't forget thatsome 
of your treasures can have uses too. (You don't need to list themtwice.) 


Haunted House problems and solutions 
Here are the solutions to the Haunted House game problems 
and the objects needed for them. 





Problem Solution Objects needed 
Ad  Toodarktosee Put candle in candlestick Candle (hidden in desk drawer) 
- Light candle with match Matches 
ae Candlestick (already in 
‘ valuable objects list) 
x Bats Spray with “Baticide” Aerosol can 
Secret room Break down false wall Axe 
Locked door Unlock Key 
Paralysing ghosts Suck up with vacuum cleaner Portable vacuum cleaner 
Batteries 
Magical barrier Use magic spell Book of magic spells (already 
in valuable objects list) 
Marsh Get across in boat Boat 
(Can only be used once as 
i it gets stuck in mud) 
Barred window Dig round edge to remove bars Shovel 
Coffin Openlid Nothing 


cide where the objects are to goand NAR! a re< 
‘k them on your master plan. They will \ at ane AN 


less conspicuous if you put them in 


laces where people would expect to find ted ation 
i se : : Haun Locate’ 
em, e.g. knife inthe kitchen, bookinthe | ic oe number 
_ study or library, axe near the woodpile. You | Objer obje! Ges or 
_ might want to add extra props (see previous | a Maraum clone” 26 
_ page) at this stage. Haunted House hasa 70 garteri"s 2 





ES ‘ oa, \ 11 shovel 7 
‘desk in which the candle is hidden. ii axe 41 
\ 


emember not to put your objects in A Roeat 01 can ve 
impossible; places. Itis no good putting the 15 aernale 32 
~ light behind a locked door and then putting \ is evorth 
the key ina dark room. \" LA south 
Put the number of the location next to iy 20 West 
each object. Add to your list any other ae up 
| words (not verbs) that you will want the \ % ae 13 > 
computer to understand, too e.g. north, oe Bots ve 
south, ghosts, bats, coffin. (Remember to \ 


include all your props.) 





...and what can be done with them 


Now you have decided on the objects to go 
in your game, what are you going to letthe 
player do with them? You need to makea 
list of verbs and the things they apply to. 
This should include “going” verbs too, so 
that players can give instructions about 
where they want to move to. 

Many adventure programs are 
constructed so that the computer accepts 
commands of not more than two words from 
the player. It checks the first word againsta 
list of verbs you have put in its memory and 
the second against the object and direction 
words you have givenit. A lot of the funin 
writing adventures is trying to think ofall 


Haunted House verb list 


Number your verbs starting with 1. (The 
computer uses zero for “verb not found”, 
as you will see on page 16.) HELPand 
INVENTORY (or CARRYING?) are 
standard adventure game features so 
include them in the verb list. Itis also 


Verb 


number Verb Applies to 


HELP s 
CARRYING? 
DIRECTIONS 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
10 


OBJECTS 


OBJECTS 
ANYTHING 
DOOR, DESK 
BOOKS, SPELL 


OPEN 
READ 


BOD 


SAY 
DIG 
SWING 


ANY WORDS 


Noa 


AXE 


CLIMB 
LIGHT 


UNLIGHT 
SPRAY 


ROPE 
CANDLE 


oo 


CANDLE 
AEROSOL 


VACUUM 


KEY, DOOR 
ANY WORDS 


SoS) 
=i) 


po 
iss) 


USE 


bo 
io) 


UNLOCK 
LEAVE 


[ic} 
om 


the combinations of verbs and objects that 
the player might try and deciding on what 
action or reply the computer should give. 
Writers of business programs need to think 
inthis way too, to prevent their programs 
crashing because of an unexpected 
response from the user. 

To deal with verbs (and objects) which 
the computer cannot find in its memory, 
you can include general replies, suchas 
“Do what with the (object)?”. Group 
together verbs which mean the same 
thing, suchas get and take. You will be 
able tosave memory space by sending 
the computer to the same routine for both. 


useful to add shortened forms of GO 
NORTH etc. (see verb numbers 4-9 in the 
chart). These reduce the amount of 
typing the player has to do and make the 
game faster to play. 


Action (conditions, if any, in brackets) 


Used to indicate “verb not found” 

Lists all verbs the computer knows 

Lists all the objects player is carrying 

Moves position 

Shortened form for “GO NORTH” 

Shortened form for “GO SOUTH” 

Shortened form for “GO WEST” 

Shortened form for “GO EAST” 

Shortened form for “CO UP” 

Shortened form for “GO DOWN” 

Pick up object and take it with you 

(Object must be in the location) 

Same as GET 

Reveals any concealed object 5 

Opens door or drawer (must have key for door) 
Displays written clues (must have book of spells 
or be in library) 

Says words typed “out loud”, e.g. casts spell 
Makes a hole (must have shovel and be incellar) 
Breaks down false wall (must have axe and be 
instudy) 

Go up or down rope 

Turns light on (must have candle, matches and 
candlestick) 

Turns light off (must be carrying lighted candle) 
Removes bats from rear tower (must have 
aerosol) 

Sucks up ghosts (must have vacuum and 
batteries) 

Opens door (must have key) 

Leave object behind (must have object) 

Prints out score 
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PLANNING A GAME 


The master plan 


Your master plan and the lists you have 
made contain all the information, or data, 
needed for your program. Here is the 
completed master plan for Haunted 
House. (Don't worry if your master plan 


doesn't look as elaborate as this.) Over the 
page, you will find out how to put this data 


in your computer. Before you touch your 
computer, though, make sure you have 
planned out your game to the last detail. 


Adventure brain teasers 


Here are some situations players might 
perhaps find themselves in during an 
adventure. See how many solutions you 
can think of for each one. There are 
some suggestions on page 47. 


1. You are trapped in a room about 
three metres square. There are no 
doors. There is a thick carpet. 


2. As youenter aroom, a feeling of 
extreme drowsiness comes over you. 
You are carrying a small, but quite 
heavy, rucksack and a handkerchief. 


3. You are standing on the battlements 
ofacastle. Beneath you is a horde of 
angry slaves and behind youarmed 
soldiers. You have a parchment scroll 
in your hand. 


4. You have been invited to dinner by 
the evil arch-villain. He has taken away 
all your weapons. As dessert is served, 
he shows you the remote control for his 
world decimator weapon. 


Can youthink of 
some more 
adventure brain 
teasers (and 
solutions for them 
of course)? 
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Putting the data into the computer 


You now have all the data for your 
adventure written out on pieces of paper. fi 
The next problem is to work out how to put 
itinto the computer's memory. 

The computer needs the data stored in 
sucha way that it can get at eachitem 
quickly and update things as the player 
progresses through the game. To do this, 
you set up storage areas called “arrays” in 
the computer’s memory. An array islikea 
set of pigeon holes or filing boxes. You 
give each array aname and each box inita 
number, so the computer can find the box 
you want when you refer to it in your 







The $ sign indicates that this is 
\ astring array, that is, one for 
) storing letters and words. 















This array is set up inthe 
program by writing 
DIM D$(63). 









program. 
Se \ 
of 50 
a Ee This is an 2. Anarray to hold the information about the 
array called "X" routes the player can take from one location 


to another. This is R$(_). It needs to be the 
same size and numbered in the same way as 


D&C ). 


3. Anarray for the objects and other words 
onthe word list. By dimensioning this DIM 
O$(W), where W is the number of words on 
your list, the computer will set up an array 
with one space for each word and anextra 
space. This is because it always starts 
numbering with zero and ends withthe 
number in the DIM statement. This is useful, 
because the zero space can be used for 
“word not found in memory”. 





e.g. If W=4, the array would look like this. 
DIM O$(4) gives five spaces labelled 0 
to4. 








Before you can give the computer any 
data, you must decide how big eacharray 
should be and tell the computer to reserve 
and label that much space. This is called 
“dimensioning” the array and is written 
DIM in BASIC. 


The arrays for Haunted House | This is why the word and 
verb lists were 
P numbered beginning at 
Haunted House needs the following arrays 1, not Olike hey location: 


to hold its data. You will need similar arrays 
whatever the theme of your adventure. 


1. An array to hold the descriptions of the 
locations. It needs 64 pigeon holes (one for Using variable names, 
each location). We've called it D$(_) and . pin pel he aes 
numbered the holes 0 to 63 as on the master Be. uniber otuards and 


16 plan. fe verbs ata later stage. 





4. Averb array. This needs a space for each 
verb and an extra space for “verb not 
found”. It is called V$(_) and needs tobe 
dimensioned DIM V$(V) where V is the 
number of verbs on your list. 


More arrays 


Locations, routes, object words and verbs 
are not the only information that needs to be 
stored in the computer. You also need 
arrays to store information about where the 
objects are, which objects the player is 
carrying and such things as whether the 
light is on or off. 

There is no need to store the objectand 
location words again. This extra information 
can be stored as numbers to save space, 
e.g. object 9 is in location 10. 


Array L( ) shows which location eacn 
object is in. It only needs spaces for the 
“gettable” objects suchas the key, not the 
props or other words. If Gis the number of 
gettable objects then this array is 
dimensioned DIM L(G). 


Array C(_) is for information about which 
objects the player is carrying. This also 
needs spaces only for the gettable objects, 
so is dimensioned DIM C(G). 





Number arrays 
don't need $ 
signs after their 


names. 


Flags 


As wellas keeping track of the things the 
player is carrying, the computer needs to 
be able to record other changes that 
happen during the game, e.g. whether the 
candle is alight, the door locked or the key 
visible. 

This can be done by using an array, F( ), 
of markers or “flags”, which contains W 
spaces, i.e. one for each object word. By 
putting 1s and 0s in these spaces, the 





computer can see what state the objectis in. 
Ois used for the “normal” or “inactive” state, 
suchas light off, object visible. 1 shows the 
“active” or “not normal” state, suchas light 
on and object invisible. 











Did you know that computers 
have flag registers in their 
CPUs which work like this flag 
array? They use them to store 
information about what is 
happening while a program is 
running. 





STORING THE DATA 
Putting the data into the arrays 


Having set up labelled storage areas inthe 
computer’s memory, you need to tell it what 
to put in them. One way of doing this is to list 
the data, in order, and tell the computer to 
loop round putting one item at atime inthe 
spaces in anarray.* Here is how thisis 
written in BASIC: 


DIM OS (W) 

DATA PAINTING, RING, MAGIC SPELLS,GOBLET,ETC. 
FOR I=1 10 W 

READ O${1) 

NEXT I 


Sar 






First time round, I=1, so 
PAINTING is put in 
O$(1). Computer goes 
back for the next value of 
land puts the next item, 
RING, in O$(2) and so on. 










Loop starts with 1 for 
object, verb and the 

three number arrays, so 
computer leaves space 

zero empty. For location 
and route arrays, loop 
starts at zero. 


















Commas separate 
items of data. 


O$( ). Look at lines 1600 to 2100 inthe 
program listing on pages 36 and 37 andsee 
if you can pick out the data loops for the 
other arrays. 









Data for the flags 


The data for the flag array, F(_ ), consists 
only of ls and zeros. Objects which are 
invisible at the start of the game have lin 
their box in F( ). When they are discovered 
by the player the flag changes to zero. All 
the other objects start with zero. 





You only need to tell the computer which 
boxes in F( )need lsinthem. Leaving the 
rest empty is the same as filling them with 
zeros. The easiest way to fill this array isas 
shown in line 2090 (on page 37). 

You may have noticed that some spaces 
inF( ) are not used because some objects 
do not change their “state”. These spare 
flags can be used for other things. For 
instance, in Haunted House, F(14) (the rope 
flag) is used to show whether the player is 
up the tree. The candle needs two flags— 
one to show ifit is visible and another to 
show if itis lit. The spare flag F(0) is used for 
lighting it. If you want a spare flag for 
something, use the ones for words that 
won't need them, like “north”. 


Data for the carrying array 


The player isn't carrying anything at the 
beginning of the game, so to show this the 
array C(_)is left empty. When an object is 
picked up the computer puts a 1 into its box. 
So, no data lines are needed for array C( ). 


Initialization 


*The ZX81 (Timex 1000) does not do this, see page 39. 


WRITING THE PROGRAM 


The program structure 


Inorder to arrive at the overall structure of 
the adventure program, you need to think 
about the jobs the computer has todo 
during the game. 


The structure of the program actually looks 
like this. As you can see, the biggest part of 
itis the subroutine section. There needs to 

be one subroutine for each verb used inthe 


game. You will find out more about these on 
page 25. 


REcanaannsnhynl 


Computer® jobs = 
et up arrays and put data into 
te INITIALIZATION iN) 


description 
2: Ae 1 aeeseerOn or addition 
EY Prt any ming from tom yctions 
i FEEDBACK) 
et of instructions. 






















pla yer location and its 


given by player. ae 
er for ne 
4. Ask play st known 


UT, 
= heck ployer’ one 2901 NALYSIS) 


list of words @ sy 

a. If instructions 
: prompt t + the player a 
instructions. ERR' 
6b.Ifinstructions 

subroutine 
(BRANCH SUB : 

7 Use subroutines 70 
instructed. 
8. Go packto<. 


ke action aS 


The list above shows the order in which the 
computer needs to do things, but not 
necessarily the order in which they need 
appear in the program. A large chunk of the 
program is the initialization routine whichis 
only needed once each game, and, 
although it is the first thing the computer 
must do, it isa good idea to putit at the end 
ofthe program. This is because every time 
the computer is told to GOTO or GOSUB it 
goes back to the beginning of the program 
and checks through each line number until 
it finds the one it wants. This can takea 
noticeable amount of time inalong 
program. By putting initialization at the end, 
the computer does not have to check 
through it each time the player makesa 
move. 


WRITING THE PROGRAM 


Getting into the program 


Now you have an overall idea of what the program will be like, you can start thinking about 
each part in more detail. You have already seen on pages 16 to 18 how the initialization 
section works. The next eight pages describe how the other main parts of the program 
work. 


Description and feedback 


Every go, the computer must tell the player where he is and the directions in which he can 
move. It must also tell the player what happened as a result of his last instructions. Thisis 
the description and feedback section and it looks something like this. See if youcan 
identify each part in the program listing on pages 35 to 87. 


RMis the number of the location the player 
isin. Youmust remember to seta starting 
value for this in the initialization routine. (For 
Haunted House 57 is the starting value for 
RM, see line 2090), 







o 90 PRINT "TITLE OF GANE* 

100 PRINT *------------- . 

110 PRINT "YOUR LOCATION: * ° 
© 120 PRINT D$(RM) 










The computer looks in D$ (the array 
containing all the descriptions) and prints 
what it finds in the box with the value RM. 


Looksat the length of the string in box RMin 
the routes array, R$. The computer then 
loops round this number of times, printing 
out each character in R$(RM) in turn, 
putting acomma anda space between each 
one. 














40 FOR T=1 TO LEN(RS(RM)) 
150 PRINT MIDS(RS(RM),T,1)5", 7% 
160 NEXT T 














“NWE"-so 
LENR$(57)is 3. 


Loops round to see if there is an object with 
azero flag in the location (i.e. avisible 
object) and prints out its name if there is 








M$ isa variable used to contain messages 
the computer has for the player, as aresult 
of instrucuons given in the previous go. 
Look for M$ in the program listing on pages 
33 to 37 and see how different messages are 
put into M$ depending on what the player 
typed. 





"1 SEE "381003 “HERES — 


o 200 NEYT 1 
220 PRINT M$ 










ii acaciaaesiaiint 
225 MG="HHAT?" ¢ At the beginning of each go, M$is set to 
‘WHAT?’ so if there is no new message to 
replace this, the computer just prints 


“WHAT?” 


















Urgent 
message for 
player from |- 
Subroutines. | 





Right -I'll take 
“WHAT?” out. 





The input section 


An important feature of adventure games is the way the computer responds to instructions 
typed into it by the player. Haunted House, like many adventures, limits the playerto 
two-word sentences, plus a few special one-word commands such as HELP. The next 
section of your program must ask the player for instructions and then tell the computer 
what to do with them. 

To start with the computer needs to split the player’s input into two words which it can 
then check against the words it has in its memory. The “word-splitter” routine used in 
Haunted House works by scanning the player's input until it finds a gap in the letters. Itis 
listed below with a few extra lines so you can type it in by itself and see it working.* 


160 CLS Gets player's instruction and puts 
110 PRINT "PLEASE TYPE SOMETHING" itin Q$. Sets up two new string 
120 INPUT O¢ variables: V$ and W$. 
30 aoe 
FA no " Looks to see how many 
characters there are in Q$and 
150 FOR [=f TO LEN(C$) —_—_—_— oo Starts a loop which goes round this 


many times. 


160 IF MID$(Q$,1,1)=" " AND VS= 
"" THEN VS=LEFTS(Q$, 1-1) Looks through Q$ for a space. Ifit 


finds one and V$is still empty, it 
OK T'lll put puts all the letters to the left of the 
this part 


space into VE. 
in VE 


















I've found 
aspace ! 







These line numbers 
do not correspond 
to numbers in main 
program listing. 


/ 
( 
‘ontinues to look through Q$ until 


it finds a letter following a space 
It then takes everything to the 
right of this space and puts it in 
W$. (This means it doesn't matter 
how many spaces the player 


; types between his two words.) 
170 IF MID$(Q$,1+1,1)¢>" " AND V8¢>"" THEN HS=HID$ 


(Q$, T+1,LEN(Q8) -1)_ 1=LEN (08) When V$and W$ are both filled, 


—— the loop counter is set to its 


maximum value to end the loop. 








180 NEXT I 

190 IF W="" THEN V$=0$ Ifthe computer didn't finda gap in 
the letters then V$ and W$ will 
still be empty when the loop has 
finished. It then takes the whole of 


Q$ and puts it in V$. 





200 M$="THESE ARE YOUR 2 WORDS" 
210 PRINT "FIRST WORD=";V$ 
220 PRINT “SECOND WORD="54$ 


230 IF W$="" THEN M$="YOU ONLY TYPED ONE WORD” This section isso you can run the 
240 IF W$="" AND V$="" THEN N$="YOU DIDN’T TYPE word-splitter by itself. It prints out 
ANYTHING" messages depending on what 

250 PRINT M$ you typed in. Run the program 
260 STOP and see what happens. 


*NB This will not work on Sinclair (Timex) computers. See pages 38 or 39. 
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WRITING THE PROGRAM 
Analysis of input 


The computer now has the player's instructions stored in two strings V$ and W$, which 
stand for “verb string” and “word string”. Its next job is to check these against the words 
you have given it in the initialization procedure on page 18. It assumes the word in V$isa 
verb and loops round seeing if it matches any of the verbs in the array V$(_).(Notethe 
difference between the string variable V$ and the array V$(_)-they are completely 
different things to the computer, so make sure you don’t confuse them.) 

The computer then loops round in the same way trying to match up W$ with one ofthe 
words in the array O$( ). : 

Here is the section of program which checks for a match between the player's words 
and the words in the computer's memory. 


10 1 VB is anew variable set up to record the 


box number containing the matching verb. 
Ifthe player typed GET, for example, the 
computer looks through V$(_) untilit 
reaches box 10 where GET is stored. So, in 
this case, VB= 10. 







I've found 
it - ifs 
in 10. 







The computer loops round V times (V is the 
number of verbs in the computer's 
memory), comparing the player's verb with 
each of those in its memory. Ifit findsone 


20 FOR I=1 70 V 
30 IF ¥$=¥$(1) THEN VB=I 


b 
SON that matches, it sets VB to the appropriate 
number. 
ni ieee TOW The loop for W$ works in the same way, 
ous using OB to record the box number of the 
70 IF W$=0$(1) THEN OB=1 matching word, 
80 NEXT I 


What if the words don’t match? 
Ifno match was found, then VB and OB will 
still be zero. The computer takes this as 


Silly combinations 


Notice that this matching-up process only 


meaning that box zero inthe array contains 
the match for the player’s word. But whenit 
looks there to find out what the matching 
word is it doesn't find anything because you 
left this box empty when filling the arrays 


















nothing 


my there. 


checks if the two words are inthe 
computer's memory. It doesn't check to see 
ifthe combination of words makes sense. A 
silly combination such as UNLOCK 
CANDLE gets through this stage of the 
program, but will be rejected later on when 
he computer tries to carry out the action. It 
is much quicker just to check the separate 
ords at this stage than to tell the computer 


" to check for valid combinations. 


At the end of this section of the program, 
the computer has a value for VB and avalue 
for OB. You can see what it does with these 
over the next page. 


Setting up error messages 


The computer can use the values of VB and 
OB to see if the player needs to be senta 
message saying his instructions are no 
good. This part of the program is like a filter 
or grader. The player’s instructions are fed 
through a series of tests. If they don’t pass 
one of the tests, anew message is put in M$. 
Ifthey pass through all the tests, M$ still 
contains the message “WHAT?” which was 
set up in line 220. (Remember that, at this 
stage, the messages are just set up, they are 
not printed on the screen and may be 
changed again later in the program 
anyway.) 

Here are the program lines which set up 
the error messages in Haunted House -see 
if you can find them in the main listing. You 
will need similar lines if you are writing your 


own adventure. 
thas, 7 


PO 20/ 









Remember the message 
in M$ might be changed 
again later on inthe 

program. 














The first test looks to see if there is a wordin 
W3 (i.e. that the player typed two words) 
and then checks if the value for OB is zero. 








© TF YB=O THEN VB=V+l 





This line is to overcome a problem. You 
cannot GOSUB ona value of zero. But 
different BASICs vary in the way they cope 
with being asked to do this. Most ofthem 
ignore the GOSUB and carry on to the next 
line. Some, however, such as the BBC, 


object to the zero and produce an “on 
range” error. To get round this, VBis 
changed from zero toa value greater than V 
(the number of verbs in the computer’s 
memory), and the computer is sent toa 
“dummy” subroutine. 















aR ma NRC gen AN 


°F WS="" THEN M$="I NEED THO WORDS” © 
°o ° 





I need 
two words. 


This line sets up a message if the player 
only typed one word and so W$ is empty. (If 
the word is one of the allowed one-word 
commands, this message will be changed 
later inthe program.) 











° 
IF YB? AND OBY0 THEN N$="YOU CAN'T.” ss 


"eggenee 
= ° 


You can't 
“kill ghosts" 


This line sets up a message if the computer 
doesn't have the verb inits memory, but 
does have the object. 


IF YB>V AND QB=0 THEN M$="YOU DON’T 
MAKE SENSE" 


° 





o 











You don't 
make sense. 


If the computer doesn't have either of the 
player’s words inits memory it sets up this 
message. 
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WRITING THE PROGRAM 


6 


° ° 
IF VBCY AND O80 AND C(OB)< 21 THEN MS= 
© "YOU DON’T HAVE "G$(OR) = 














° 





You don't 
have candle. 





Override conditions 


Sometimes things happen in an adventure 
which prevent the player from doing 
anything until he has dealt with them. In 
these circumstances, instructions which 
would normally be valid need to be 
overridden, so the computer needs 
program lines which set flags* inits 
memory to tell it that special conditions 
apply. 

In Haunted House, lines 420 to 450 are 
override conditions. You can see themon 
the right, with an explanation of how they 
work. 


Stop work 
everyone - 


Bats attacking 








*See page 18 for more about flags. 


o AND YB<>21 THEN M$="BATS ATTACKING!": ° 
6078 90 ° 


° 430 IF RM=44 AND RND(2)=1 AND F424)<>1 

o THEN F(27)=1 ° 
440 IF F(0)=1 THEN LL=LL-1 

© 450 IF LL<1 THEN F(G)=0 : 





Line 420 

f bats are present, player is in Rear Turret 
Room, random number is not 3 and player 
asn't used verb 2] (SPRAY) in his 
instructions, then M$ is set to “BATS 
ATTACKING’ and player cannot go any 
further in the game. 

Line 430 

f player isin Cobwebby Room, random 
number value is | and vacuum cleaner is 
switched off, then flag is set for paralysing 
ghosts to appear, 1.e. F(27) issetto 1. 

Line 440 

f candle is lit, then light limit counter, LL, is 
decreased. 

Line 450 

f LL is zero, then candle on/off flag, F(0), is 
set to zero 





Perhaps you can think of other override 
conditions which could be added here. 


Branch to subroutines 


The computer's next task is to attempt to 
carry out what the player wants to do. Ifit 
had to search through every possible action 
until it found the one the player wanted each 
time, the game would be very slow and 
boring. To avoid this, you use lots of 
subroutines — one for almost every verbon 
the verb list. (A few, such as GET and TAKE, 
can share the same one.) 

Youcanthenuse anON...GOSUB line to 
tell the computer to branch to a different 
subroutine depending on the value of VB. 













re 


o ON VB GOSUB 500,570,440, 640,640,440, © 


? “i 7 _ 
© 1180, 1220, 1250,1300, 1340,1380,1400, © 
1430, 14405-1490, 1516, 1590 ~ 









ae eae ay 


How the ON... .GOSUB line works 


The ON. ..GOSUB line on the opposite page works like this. If VB=1 the computer goesto 
the first line number listed, if VB=2 it goes to the second, if VB=3 it goes to the third andso 
on. Notice that the last line number listed is a “dummy” subroutine for VB=V-+1 (the value 
of VB when no matching verb was found in the computer's memory). The line it is sentto 
just says RETURN and so sends the computer straight back up the programagain. 

Look at the subroutines on pages 34 to 36 and see if you can work out what they alldo. 
Here is the procedure for LIGHT (VB=19) as an example. You will find it at lines 1340-1370. 











1. Ifthe object 
word in player's 
instructions is 
“candle”. 


3....AND player is not 
carrying object 8 
(candlestick)... 


2....AND player is 
carrying candle... 













IF_OB=17 AND -G(17)=1 AND C(8)=0 
THEN M#="IT WILL BURN YOUR HANDS" 






5. If object is 
candle and 
player is 
carryingit... 
















4....then this message 
is put in M$. 






6....AND 
player is not 

carrying object 9 
(matches)... 













8. If object is -19....AND 

candle and playeris 

player is ¥) carrying 
candlestick AN! 
matches... 09, 











7....then this message 
is put in M$. 






° IF OB=17 AND G(179%=1 AND C(9)=1 AND C(8) 
THEN M$="IT CASTS A FLICKERING LIGHT":F(0)=1 


; C4 
° 11... .and candle orvoff 


10... .then this message flag is changed to 1 to 





goes in M$. show itis lit. 





What happens if the objectis notcandle? Back tothe main program 


Ifthe object the player wanted to use was Although some of the verb routines are 
not CANDLE, but one of the others inthe longer and more complicated than this one, 
computer’s memory, such as DOOR, then they all work ina similar way: the value of 


the message in M$isunchangedfromwhen OBischecked,a special message is set up 
it was setup inline 220.Whenthecomputer _ifnecessary and then the computer returns 


returns to the main program and finds the tothe main program. It checks the light limit 
instruction PRINT M$ it will print the at lines 470 and 480 and is then sent back to 
message “WHAT?”. the description and feedback section. Here 

Notice that there is no need to set upa it prints out the message it has put in M$ and 
message saying the candle isn't there, as waits for the next set of instructions from the 
this is already covered in the error player. 
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messages section. 


26 


WRITING THE PROGRAM 
The GO subroutine 


The subroutine for the verb GO is so large 
and important in an adventure game you 
could almost think of it as asub-program. 
Seven verb commands are directed to it — 
GO,N,S, W, E, Uand D. This routine is also 
special because it responds to single-letter 
direction commands as well as two-word 
ones. You don't have to include this facility 
in your program, but it does help make the 
game quicker and more interesting to play. 
If you've played many adventures you will 
realize how tedious it is to have to type GO 
NORTHetc. every time. 

This is how the GO routine works. 


This is how the 
GO routine works. 


First, a variable D is set up to hold 
information about the direction in which the 
player wants to move. Its values 1 to6 
correspond to north, south, west, east, up 
and down. 








540 D0 

850 IF OB=0 THEN 
660 IF OB=19 THEN 
476 IF QB=20 THEN 
689 IF OB=21 THEN D=3 
690 TF (B=22 THEN D=4 
700 TF QB=23 THEN D=S 
710 TF OB=24 THEN D=6 







You can see now why 








720 IF RM=20 AND D=5 THEN directions were 
730 IF RM=20 AND D=$ THEN included on both the 
TAG IF RM=22 verb and the object 





lists. 





780 IF F(14=1 THEN M="CRASH' YOU FELL GUT OF THE TREE!" 
sF(14)=0: RETURN 

790 TF Fi27)=1 AND RM=S2 THEN N$="GHOSTS WILL NOT LET YOu 
MOVE": RETURN 

800 TF RM=45 AND C(1)=1 AND F(34)=0 THEN M="4 MABICAL 
BARRIER TO THE WEST": RETURN 






810 IF (RM=2s AND FiG)=G) AND (D=t GR D=4) THEN M$="yOU 
NEED & LIGHT": RETURN 

B20 IF RM: AND CUS) cof THEN ME: 

G30 IF CiLS)=1 AND NOT i 


ANTT CARRY 





The next line checks to see if the playerjust 
typed one word and then gives Da value 
depending on the value of VB. (Notice that 
by taking 3 away from VB, the computer 
gets values for D which correspond to those 
in lines 660 to710. ) 





The next six lines check if the player typed 
atwo-word direction instruction. They use 
the value of OB to set the value of D. 


As this is not really a 3D adventure, the UP 
and DOWN instructions need to be 
converted into north, south, east or west. 
Lines 720 to 770 do this. (If you check back 
to the master plan on pages 14 to 15, you will 
see that this does work.) 


Lines 780-840 


F(14)=1, so 
he's up the 
tree! 











The computer also needs to check ifthere 
are any special conditions which affect the 


If the player is in location 52 and the ghost 
flag is “on” then a message is sent to say he 


cannot move. Each of these conditions 
returns the computer to the main program. 
See if you can work out what the rest of the 
lines in this section do. 


player's ability to move. For example if 
F(14)=1, then the player is at the top ofthe 
tree. If he tries to move without first 
climbing down, he gets a message saying 


he has fallen. This is a flag for the computer to use to register 


. whether it has found the exit the player wants. 
Checking for walls Bey " 
























RLis a new variable which holds the length of the 
string which it finds in R$(RM). (This string is the 
routes, NSW etc., for the location the player isin.) 


Ifthe move has not been stopped 
by any of these special 
conditions, the computer must 
check that there isn’t a wall or 
anything else blocking the way. 
Here are the lines which do this. 
They look quite complicated at 
arst sight, but if you look carefully 
at each part, remembering what 
ali the variables are, youshould 
be able to see what is happening. 


Computer loops round RL times. 


Each loop, computer takes one of the charactersin 
R$(RM) and temporarily calls it U$. 


It then runsa series of tests on U$and D. Ifthe 
player's direction instruction matches an exit in the 
location he is in, then the value of RM is changed to 
move him to the appropriate place. F(35) is then set 
to 1 to stop the computer trying to change RMagain 
onanother trip through the loop. (If you think 
carefully, you will see that this could be possible as 
the computer uses its new value of RM in line 870.) 





F(35)=0:RL=LEN(R$(RM) ) 
860 FOR I=1 TC RL 
870 US=MID$(R${RM), 1,1) 
980 IF (U$="N" AND D=1 AND F(35)=0: 
THEN RM=RM-8:F (35) =1 
890 IF {U$="5" AND D=2 AND F(3S)=0: 
THEN RM=RM+8:F (35) =! 
900 IF (U$="W" AND D=3 AND F(35)=0: 
THEN RM=RN-1:F (35) =1 
910 IF (U$="E" AND D=4 AND F(35)=0: 
THEN RM=RN+13F (35) =1 
920 NEXT I 
930 M$="0K" If Dis less than one (Le. it wasn't assigned a value in 
0 IF F(35)=0 THEN N$="CAN’T 60 re to 770), then M$ is changed to "GO WHERE?" 


If you check the master plan, you will see how 
adding or subtracting | or 8 moves the player to the 
correct next location. 


At the end of the loop, M$is set to “OK”, This will 
replace the "I NEED TWO WORDS’ message set 
in the error messages if the player typed aone- 
word direction, 





If F(35) is still zero, then the direction the player 
wants to go is not allowed and M$ is changed to say so 


THAT WAY" 
950 IF D<1 THEN M$="GO WHERE?* 
960 IF RM=41 AND F(23)=1 
THEN R$(49)="SW":M§-"THE DOO 
SLAMS SHUT! ":F (23) =0 
970 RETURN 


This line makes the front doora “once-only” route 
When the player enters location 41 (the lobby), the 
exits from location 49 (front porch) are changed 
R from "NSW" to "SW", M$ is set to "THE DOOR 
SLAMS SHUT" and the flag for the front door isset 
to zero to show the computer it is now closed. (The 
routes from location 41 do not need to be changed 
because S wasn't included intheminthe firstplace.) 27 


28 


MAKING CHANGES 


Changing the program 


Youcan change the program inthis book as 
muchas youlike, either to produce 
variations on the haunted house theme or to 
create games with completely different 
settings, descriptions, objects, verbs and 
messages. Remember that the more you 
change, the more complicated it will get as 
you will have to think about how everything 
affects everything else. 

If you are going to write anew game, 
using this program asa guide, then you 
should plan it as described on pages 6 to 15. 
Itis worth spending the time planning out 
your game properly as youare less likely to 
find it full of mistakes when youcome torun 
the program. 

Itis a good idea to start by making small 
changes first to see what happens. If you 
store the master program on tape, youcan 
make changes, test them and adapt them 
without losing the original. 


How much spare memory 
have you got? 








The Haunted House program itself 
occupies about 7K of RAM before it is run. It 
then needs a further 3¥2 to 4K for the arrays 
to store the data. Your computer will take 
some memory for its own internal use —up 
to 3K on some models - and it will usea 
further 1K or more for the screen. (The 
Spectrum uses 7K which is why Haunted 
House won't fit into the 16K model.) So, if 
you have a 16K computer, you won't have 
much memory left over, and most of the 
changes you make will have to be 
replacements rather than additions. 


Longer descriptions 


If you have more than 16K, one of the easiest 
ways of making the game more interesting 
to play is to add longer descriptions. 
Instead of “impressive vaulted hall” for 
instance, you could say something like “You 
have entered a vast, vaulted chamber with 
pillars extending many times your height 
above you. Light filters in from the east and 
there appears to be a doorway inthe 
distance to the west...” 





Add atime limit 


Haunted House already has atime limit on 
the life of the candle. You could addan 
overall time limit to the game as well by 
getting the computer to count the number of 
turns the player has had and stop the game 
at a preset number. 

You can do this by adding to line 70 and 
putting an extra line at 485 like this. 


70 V=25:W=36:6=18: T=0 






You may not need to 
do this as not all 
computers need new 
variables to be set up 
before they can be 
used. 








485 T=T+1:1F 12200 TH 
"MIDNIGHT HAS STRUCK. 
YOU'VE TURNED INTO A BAT":STOP 





Youcan change this number to 
anything you like. 





Adding sounds 





computer's sound instructions work. Test 
some sound routines out first to make sure 
they are what you want and thenadda 

| GOSUB instruction to the line where the 
BATS ATTACKING) action occurs, eg IF RM=46 AND C(1)=1 
Squeak THEN M$=“SOMETHING SCARY IS 

HAPPENING”: GOSUB 6000 

S qu ed k You could add sounds for the front door 
slamming, the secret wall breaking, the key 
turning in the door, magic happening when 
you use the magic word and so on. This 
This is an effective way of adding tothe chart gives a few sound routines for various 
game without havingtomake complicated computers. The only limit on the number 
changes. You will need to know how your you can add is memory. 















POKE 36877, 0 P POKE 
FOR L=15 10 6 STEP - @ STEP -1 eras FOR I=! 
P L L ered ae Tt SPORE 
2 PORE 
FOR N=1 70 400:NEXT fh 
NEXT I 





FOR I=5 10 40 STEP 3 














FOR 1=50 10 2 T SOUND 180,1 
SOUND 1,2 FOR M=1 10 SOO:NEXT 
NEXT 1 SOUND 180,1 














MAKING CHANGES 


Scoring 


Haunted House has avery simple scoring 
system, awarding one point for each object 
the player is carrying. You could change to 
amore interesting system, suchas basing 
the score on the value of the object. Ifyou 
assume that the objects are numbered in 
descending order of value, then the 
painting will be the most valuable and the 
key the least. If you change line 1530 like 
this: 


1530 IF C(I)=1 THENS=S+G—I 


then the painting will be worth 18—1=17 
and the key 18—18=0. (Gis the number of 
gettable objects and I is the number of the 
object the player is carrying.) This makes 
the key valueless as an item of treasure but 
of great value as a useful object because 
without it, the player would not be able to 
get the painting or the goblet. 








If you wanted a more flexible system (and 
you have enough memory), you could set up 
an array to contain object values inthe 
initialization routine, like this: 






Use any values you like. 






DATA 20, 20,30, 11,16, 25, 32,9, 25,4,9,17,3,0, 
30 10,12,4,9 


Add line numbers. © 











DIN TI6) YDimensions new 


FOR I=1 T0 6 array T withG 
spaces (i.e. number 
bate i of gettable objects). 


Also change line 1530 as follows: 
1530 IF C(I)=1 thenS=S+T(I) 


Penalties 


So far, the scoring 
routine has only 
counted plus points 
and not been 
affected by silly 
things the player 
might try to do. You 
could add apenalty 
system quite easily by using a counter, say 
MK, for mistakes. Whenever the player 
does something really silly, youadd to MK 
and then subtract it from S when the score is 
worked out at line 1530. If the player falls out 
of the tree, for instance, you could award 
one (or more) penalty points like this: 


780 IF Fit4)=i THEN M$="CRASH YOU FELL OUT 
OF THE TREE":F(14)=G:MK=MK+1:RETURN 





Don't forget that some computers need 
new variables to be defined before they can 
be used. Youcan do this by adding MK=0 
to the variables in line 70. 


Saving the game 


It would be nice to 
be able to switch 
off part way 
through a game 
and then carry on 
later from where 
you left off. With 
long, complicated 
games this isa very 
important feature 
and you can include it by adding SAVE and 
LOAD to the verb list. In line 70, change the 
value of V to 27 and add the two new verbs, 
separated by commas, to the end of line 
1665. You will also need to change the ON 
GOSUB line at line 460. 





Put the line numbers of the twonew Do you give in? 
subroutines (one for SAVE and one for 
LOAD) between the last two numbers inline 
460 so that they read: 

. .. 1510,3000,4000, 1590 


Like most adventures, Haunted House 
contains traps for the player which canonly 
be avoided by using a certain objectina 
certain way. If the player doesn't have that 
object he is stuck. A “quit” feature would be 
useful in this situation so the player does not 
have to press BREAK or ESCAPE to end the 
game. Youcan do this by adding QUIT to 
the verb list and putting in anew subroutine, 
as for SAVE and LOAD described onthe 
left. 


First new number Second new number 


Then add the new subroutines like this, 
checking your computer’s manual to make 
sure the wording is correct. 












$3000 INPUT "IS YOUR CASSETTE 
READY TO RECORD" Y$ 


3010 IF ¥S<> THEN 3000 ., 

Bs computer's own 
2 ILE F ‘ ‘ 

3020 OPEN FILE FOR OUTPUT FROM structions. You 


. \ 
ees may not even need 

—\a line here at all. 
3030 PRINT #1, 8§ fo 


\ 9 
This saves the 

room the 
player isin. 





Replace this line 
with your 
















This loop saves 
_ | positions of 
gettable objects. 










You must remember to change the 
value of V in line 70, add QUIT to the end of 
line 1665 and insert the new subroutine line 
number in line 460, putting it inthe second 









3040 FOR I=1 106 
PRINT #4,L 41) 
NEXT I 





FOR I=1 10 W Se to last position. 
Fe , 
a aay AW CUD) FUD SSG “s The QUIT subroutine should be 
0 CLOSE on ; something like this: 
RETURN j 
AOU THPUT “ARE YOU READY TO LOADMs Ys é 


4010 IF YSC>"Y" THEN 4000 

4020 OPEN FILE FOR INPUT TO COMPUTER 
4036 INPUT #1, RM 

4040 FOR I=1 10 6 

4050 INPUT #1,L¢1) 
4060 NEXT I 

4070 FOR I=1 TO W 

4080 INPUT #1,C(1),F (1) 
4090 NEXT I 

4100 CLOSE 

4200 RETURN 


5000 INPUT "WANT TO QUIT"SQ$ 
S010 IF Q$¢>"Y" THEN RETLRA 
5020 INPUT "LIKE TQ SAVE GAME FIRST", Q$ 
5030 IF @$="¥" THEN GOSUB 3009 





This saves items the 
player is carrying and 
the state of the flags. 











You don't need this if you 
haven't put the SAVE feature 
in. 


Note that this save routine does not save the 
descriptions and routes in the game. This 
means that the rooms and routes altered by 
the player's actions will return to their 


5040 PRINT "THANKS FOR PLAYING" 
5050 END 


original state — the secret wall willbe Notice that there is no RETURN at the end of 
rebuilt, the door relocked and so on. (The this subroutine. This is usually against the 

ghosts are probably responsible.)You rules in BASIC but, in this case, the 

could save the D$ and R$ arrays if you computer cannot get confused because the 
wanted to, by adding extra loops to each of program will no longer be running when it 

the SAVE and LOAD routines. reaches line 5050. 31 


If you have a BBC, you may need to replace semi-colon with acomma. 


MAKING CHANGES . 
Debugging your adventure 


If you write your own version of Haunted House or use the routines init to make anew 
adventure, then you are quite likely to make mistakes. Finding mistakes and puttingthem 
right is called debugging. Here are some of the problems you might come across andsome 
suggestions for fixing them. 





Comma missed out. a?) 


Array error . 


Error here. 


If you get an array error, it means that you didn'treserve DIN F(3) Se 
io! 


bw) 


enough space when you DIMmed the array or you 
accidentally put an extra item in the DATA statement FOR I=1 10 4 

(perhaps by putting inanextracomma)andthencounted READ A‘I) 

this extra iter when working out the number for the READ NEXT 1 

loop. DATA AXE, COFFIN, BLOOD, KEY 


\Objects behave in strange ways ’ 


This could happen because the program is being directed to the wrong subroutine by 
the ON GOSUB line. Check each number in this line against the subroutine with the same 
number. If these are all correct, check the DATA statement for the verbs to see iftheir 
order coincides with the order of the subroutines. 

Ifthe program is going to the correct verb subroutine and the verbs are listed inthe 
correct order, check that there is a RETURN line at the end of each subroutine. If thisis 
missing, the computer will “fall through” the program to the next subroutine down which 
may produce some strange results. 

Ifnone of the above things solves the problem then check through the conditions in 
the subroutine carefully. You might have missed something out or got a sign wrong or 
used the wrong variable by mistake. Check the override conditions and flags which 
occur earlier in the program too. 

















Exits in funny places 


Objects don’t appear where they should 





Ifan object appears in the wrong place then you've probably made a mistake in the data 
for array L. If an object doesn’t appear at all, check the flag array. You must have set the 
flag with that object number to 1, which means that the object is there but the computer 
won't tell you. You need to set the flag to zero. Check the initialization routine where the 
flags are set up and then the flag references throughout the program. 








INPUT & INPUT ANALYSIS 








The Haunted Houselisting 


This is the program listing for the Haunted House adventure. It should run onany 
computer which uses Microsoft-style BASIC and which has a minimum of 16K of RAM. You 
may have to make a few minor changes for your computer — look out for comments nextto 
certain lines in the listing. If you have a VIC 20 or an Oric, there are a few extra lines anda 
line change which you will find at the end of the listing on page 37. If you have a BBC Model 
A, use mode 7. 

This listing will not work as it is on Sinclair (Timex) computers. If you have aSpectrum 
(Timex 2000), turn to page 38 for changes to make to the program. If you have aZX81 
(Timex 1000) there is a special listing for you on pages 39 to 45. 

As this is a long program, you will have to be extremely careful when youtype it in. The 
smallest mistake could prevent it running properly and will be very difficult to find once 
you've typed the whole program in. Check each line as you go, especially the ON GOSUB 
and DATA lines. Some of the program lines are so long that they take up two or more lines 
onthe printed page. Look out for these and make sure you do not press RETURN or ENTER 
until the end of the program line. 











Ifyou have a VIC 20, change 
CLS to PRINT CHR$(147). If you 
have an Apple change it to 

HOME. 


10 REM HAUNTED HOUSE ADVENTURE 

20 REM #ESEEEESEEESESE EERE EEEE 

30 REM THIS VERSION FOR "MICROSOFT" BASIC 
40 REM REQUIRES A MINIMUM OF 14K 

50 REM SELECT "TEXT NODE" IF NECESSARY 
bO REM FERHEESESESSEEESEEEEES EEL E SES 
65 CLEAR 100 
70 V=25:W=36:6=18 
80 GOSUR 1600 
90 CLS:PRINT"HAUNTED HOU 
SOQUPRING Saa=sees-ess22 














Line 70 sets up the 
variables. V is number of 
verbs, W is number of 
object words, Gis 
number of “gettable” 
objects. 







Only needed 
on TRS-80. 



















SE 












M 
O} || 110 PRINT "YOUR LOCATION" 
a 420 PRINT DS (RM) This line sends program & \ 
a 130 PRINT "EXITS: "3 to initialization routine. e\ 
fll | 140 FOR I=1 TO LEN(RS(RM)) 
2 150 PRINT MIDS(RS(RM) 1, 1)5%)"% See page 20'o find out ey, 
fe) 160 NEXT J how the description and o 
& 170 PRINT feedback section works. 
a4 180 FOR I=1 T0 6 
DO} | 390 TF LUI)=RN AND F(1)=0 THEN PRINT "YOU CAN SEE "30$(1);" HERE" 
Al | 200 NEXT I 
210 PRINT "== 
‘A220 PRINT N$:N$="HHAT" . liyou have’ BBG you 
730 INPUT "WHAT WILL YOU DO NOW";S Se Hilde koran a 


240 YS=""sWe="": VB=0:0B=0 
250 FOR I=! TQ LEN(8$) 
260 IF MID$(9$,1,1)=" " AND V$=""THEN V$=LEFTS(Q$, 1-1) 

270 IF MIDS{O$,1+1,1)¢9" *" AND V$<>"" THEN WS=MIDS(Q$, 1+1,LEN(Q$)-1):ISLEN(O$) 
280 NEXT I 
290 IF WS="" THEN V$=05 ey <2 See pages 21-22 to find 
300 FOR I=1 TOV = out how the input section 
310 IF ¥$=¥$(1) THEN YB=I works. 
320 NEXT I 


330 FOR I=1 TOW Ge 


340 IF W$=0$(1) THEN LET OB=] 











33 


ERROR MESSAGES 


BRANCH TO 
SUBROUTINES OVERRIDE CONDITIONS 


VERB 1 


VERB 2 


VERBS 3-9 


34 



























| PROGRAM LISTING 


\. 350 NEXT I 

736) 1F W$>"" AND OB=0 THEN N$="THAT’S SILLY" 
370 IF VB=0 THEN YB=V+1 a 
380 IF WS="" THEN M$="I NEED TWO WORDS" 

390 IF VB>V AND OBO THEN M$="YOU CAN’T °*+0$+"7" 
400 IF YB>V AND OB=0 THEN N$="YOU DON’T MAKE SENSE" 

410 IF YB¢Y AND OBD0 AND C(OB)=0 THEN M$="YOU DON’T HAVE ’"+ 
420 IF F(26)=1 AND RM=13 AND RND(3)<>3 AND YBC>21 THEN N$="BATS ATTACKING! ":GOTO 90 
430 IF RM=44 AND RND(2}=1 AND F(24)<31 THEN F(27)=1 
440 IF F(O)=1 THEN LL=LL-1 
450 TF LL¢L THEN F(0)=0 





See pages 23-24 to find 
out how the error 

messages section 
works. 











Use your computer's 
form of RND here. 






460 ON YE GOSUBSO0, 570,640,640, 640, 640 848640, 640, 990, 980, 1030, 1070, 1140, 1180, 1220, 1250 , 
1300, 1340, 1380, 1400, 1430, 1460, 1490, 1516, 1590 
470 TF LL=10 THEN N$="YOUR CANDLE IS WANING!" 
480 IFLL=1 THEN M$="YOUR CANDLE 19 OUT!" 

490 GOTO96 


S00 PRINT*WORDS 1 KNOW: " eo 
o -) 
Ae 


















Change this line for 
VIC 20 and Oric. 
See page 37. 
S10 FOR I=1 TO ¥ 

520) PRINT V8(T)3", "3 

O30 NEXT I 

540 M$=""sPRINT 

550 GOSURIS80 

560 RETURN 

O70 PRINT'YOU ARE CARRYING: " 
580 FOR I=1 10 6 

590) TFC(L)=1 THEN PRINTOS(I);", "5 
600 NEXT I 


610 HG=""sPRINT 
620 GOSUBI580 
630 RETURN 


640 D=0 

650 IF OB=0 THEN D=VB-3 

660 IF OB=19 THEN D=1 

670 IF QR=20 THEN D=2 

680 IF QB=21 THEN D=3 

690 IF OB=22 THEN D=4 

700 TF OB=23 THEN D=5 

710 IF QR=24 THEN D=6 

20 IF RM=20 AND D=5 THEN D=1 
730 IF RM=20 AND D=6 THEN D=3 
746 IF RH=22 AND D=6 THEN D=2 
750 IF RH=22 AND D=5 THEN D=3 
760 IF RH=36 AND D=6 THEN D=1 
770 IF RM=36 AND D=5 THEN D=2 
780 IF F(14)=1 THEN M$="CRASH! YOU FELL OUT OF THE TREE! ":F(14)=0:RETURN 

790 IF Fi27)=1 AND RH=52 THEN M$="GHOSTS WILL NOT LET YOU MOVE": RETURN 

800 IF RM=45 AND C(1)=1 AND F(34)=0 THEN M$="A MAGICAL BARRIER TO THE WEST":RETURN 
810 IF (RM=26 AND F(Q)=0) AND (D=1 OR D=4) THEN M$="YOU NEED A LIGHT": RETURN 


Take extra special care 
to type this line 

correctly. It will mess up 
the game if you get it 
wrong. 



















The branchto 
subroutines section and 
the verb subroutines are 
explained on pages 24- 

25. 





You can find out how the 
GO subroutine works on 
pages 26-27. 


VERB 13 


VERB 14 


VERB 17 VERB 16 VERB 15 


VERB 12 VERBS 10 & 11 











































820 IF RM=54 AND Ci1S) <1 THEN MS="VYOU'RE STUCK! *:RETURN 
830 IF C(1S)={ AND NOT (RN=53 OR RM=54 OR RM=55 OR RM=47) THEN M$="YOU CAN'T CARRY A BOA 
fT!" s RETURN 

840 IF (RM>26 AND RMC3O0) AND F(O)=0 THEN M$="TO0 DARK TO dass iy a Fa) 
850 F(35)=0:RL=LEN(R$ (RM) } 
860 FOR I=1 TO RL 
870 US=HIDS(RS(RM) 1,1) 
880 IF (US="N* AND D=1 AND F(35)=0) THEN RM=RM-G:F ( 
890 IF (U$="S" AND D=2 AND F(35)=0) THEN RM=RM+8:F (35)=1 
900 IF (Uig="W" AND D=3 AND F(35)=0) THEN RM=RM-1:F (35)=1 










If youare using a VIC 20, 
you could shorten the 
messages to 22 


910 TF (U$="E" AND D=4 AND F35)=0) THEN RM=RM+1sF (35)=1 characters or make sure 
920 NEXT I the spaces fall in the 

a pare right places so the 

730 H$="0K messages look better on 
940 IF F(35)=0 THEN HE="CAN'T GQ THAT WAY!” the screen. 


950 IF D<1 THEN M$="G0 WHERE?" 
960 IF RM=41 AND F(23)=1 THEN R$(49)="SW":M$="THE DOOR SLAMS SHUT! ":F(23)=0 

970 RETURN 

980 IF O86 THENM$="I CAN'T GET "+H$:RETURN 

985 IF L(QB) <> RH THEN M$="IT ISN’T HERE" 

990 IF F(OB) <20 THEN M$="HHAT "+H$+"?" 

1000 IF C{QB)=1 THEN M#="YOU ALREADY HAVE IT“ 

1010 IF OB30 AND L(QB)=RM AND F(OB)=0 THEN C(OB)=1:L(OB)=65:M$="VOU HAVE THE "+H% 
1020 RETURN 

030 IF RM=43 AND (OB=28 OR OB=29) THEN F(17)=0:M$="DRAWER GPEN* 

1040 IF RM=28 AND OB=25 THEN M$="IT'S LOCKED" 

1050 IF RM=38 AND OB=32 THEN MS="THAT*S CREEPY! *:FiZ)=0 

{080 RETURN 
070 IF QB=30 THEN F(18)=O:M¢="SOMETHING HERE!” 

1080 IF OB=31 THEN M$="THAT’S DISGUSTING!" 

1090 IF (OR=28 OR OR=29) THEN M$="THERE IS A DRAWER" 

1100 IF OB=33 OR OB=5 THEN GOSUBI140 

{110 IF RM=43 AND OB=35 THEN M$="THERE IS SOMETHING BEYOND. .* 

1120 IF OB=32 THEN GOSUB1O30 

1130 RETURN 

1140 IF RM=42 AND OB=33 THEN M$="THEY ARE DEMONIC WORKS" 

1150 IF (OB=3 OR OB=36) AND C(Zi=1 AND F(34}=0 THEN M="USE THIS WORD WITH CARE "XZANFAR™® 











Fe Use your computer’s 
1160 IF C(S)=1 AND OH=5 THEN M&="THE SCRIPT IS IN AN ALIEN TONGUE” | formofRND here. 


1170 RETURN 

1180 HE="0K THwse"?* wee 
1190 IF C(3)=1 AND OR=S4THENMS="£MAGIC OCCURSE*:IF RMCS45 THEN RM=RND(63)C— ee 
1200 IF C(3i=1 AND OB=34 AND RM=45 THENF (34)=1 S _ 
1210 RETURN CA 

220 IF C(12)=1 THEN Mé="VOU MADE A HOLE™ 

1230 IF C(12)=1 AND RM=30 THEN HE="DUG THE BARS OUT":D$(RM)="HOLE IN WALL*:RE(RH) ="NSE" 

1240 RETURN 

T250 IF C(14) <31 AND RM=? THEN MS="THIS IS NO TIME 70 PLAY GAMES" 

1250 IF OB=14 AND C(L4)=1 THEN N8="¥OU SWUNG IT" 

1270 IF OR=13 AND Ci13)=1 THEN MS="#HOOSH!" ig 


VERB 18 


24 VERB 23 VERB 22 VERB 21 VERB 20 VERB 19 


VERB 25 


INITIALIZATION 


wo 
fo?) 









| PROGRAM LISTING 


| 1280 IF OB=13 AND CiL3)=1 AND RM=43 THEN RS(RM)="WN"SDS(RMi="STUDY WITH SECRET ROGH*: HE=" 

‘YOU BROKE THE THIN WALL" 

4290 RETURN 
300 IF OB=14 AND C(14)=1 THEN M$="IT ISN'T ATTACHED TO ANYTHING!” 

310 IF GR=14 AND C(14) (#1 AND RM=7 AND F14)=0 THEN M="YOU SEE THICK FOREST AND CLIFF 

SOUTH" :F (14)=1: RETURN 

1320 IF OB=14 AND C(14) <31 AND RM=7 AND F(14)=1 THEN N€="GOING DOWN! "SF (14)=0 

1330 RETURN 

340 IF OR=17 AND C(47}=1 AND C(9)=0 THEN Mé="IT WILL BURN YOUR HANDS" 

} IF OB=17 AND C(17)=1 AND C(9)=0 THEN M$="NOTHING TO LIGHT IT WITH" 

IF OB=17 AND C(17)=1 AND C()=1 AND C(B)=1 THEN M$="IT CASTS A FLICKERING LIGHT*sF(0)=1 

i370 RETURN 

IF F(O}=i THEN F(G)=0:M$="EXTINGUISHED" 

1390 RETURN 

1400 IF OB=26 AND C(16)=1 THEN N$="HISSSS" 

{410 IF OB=26 ANDC(14)=1 AND F(26)=1 THEN F(26)=0:M$="PFFT! GOT THEN* 

1420 RETURN 

430 IF OB=10 AND Ci1O)=1 AND C(11)=1 THEN N$="SWITCHED ON"sF(24)=1 

440 IF F(27)=1 AND F(24)=1 THEN M$="WHIZZ- YACUUMED THE GHOSTS UP!":F(27)=0 

450 RETURN 

460 IF RM=43 AND (OR=27 OR GB=28) THEN GOSUBIO3O 

1470 IF RM=28 AND OB=25 AND F(25}=0 AND C(19)=1 THEN F(25)=1:R6(RM)="SEW":D$(RM)="HUGE OP 

N DOOR":M$="THE KEY TURNS!” 

480 RETURN 

1490 IF C(OR)={ THEN C(OB)=0:L (OB) =RM:M$="DONE* 

1500 RETURN 

1510 $=0 

520 FOR I=! 10 6 

530 IF C(1)=1 THENS=S41 

1540 NEXT I 

1550 IF S=17 AND C(1S)<¢1 AND RN 4357 THEN PRINT"YOU HAVE EVERYTHING’sPRINT*RETURN TO THE 

GATE FOR FINAL SCORE" 

1560 IF S=17 AND RM = 57 THEN PRINT*DQUELE SCORE FOR REACHING HERE!*:S=S%2 

1570 PRINT"YOUR SCORE=";S:IF $318 THEN PRINT"WELL DONE! YOU FINISHED THE SAME*:END 

1580 INPUT"PRESS RETURN TO CONTINUE";Q¢ 


590. RETURN 

BO) DINRE (43) ,D$ (63) , 08H) , YE (V) . 

1610 DIMC(W),L (8) FAW) eal y 
Co 


1620 DATAS6, 38,35, 50,13, 18, 28,42, 10, 
55 2b, 4,2,7,47,60, 43,32 

1636 FOR I=1 10 6 
1640 READ LI) 
1650 NEXT I 
1660 DATAHELP, CARRYING? GO,N,S,W,E,U,D,GET, TAKE, OPEN, EXAMINE, READ, SAY 
1665 DATADIG, SWING, CLIMB, LIGHT, UNLIGHT, SPRAY, USE, UNLOCK, LEAVE, SCORE 
1680 FOR I=! TOY 

1890 READ Y$(1) 

1700 NEXT J 


































TH 










If you havea BBC, you 
may need acomma here 


nr) instead of asemi-colon. 





1710 DATASE, WE, WE, SHE, HE,WE, SWE, WS 
1720 DATANS, SE, HE, NW, SE, NE, NSH 
1730 DATANS,NS, SE, HE NAUD, SE,WSUD, NS 
1740 DATAN,NS, NSE, WE, WE, NSH,NS,NS 
1750 DATAS, NSE, NSH, S,NSUD,N,N.NS 
1760 DATANE NH NE, W,NSE, WE, W,NS 
1770 DATASE,NSH,E, WE, NW,S, SW, NW 
1780 DATANE NWE,HE, WE, WE, NHE, NWE, W 
1790 FOR I=0 10 43 

1900 READRS (I) 

igl0 NEXT I 

1820 DATA DARK CORNER, OVERGROWN GARDEN, BY LARGE WOODPILE,YARD BY RUBBISH 

1825 DATA WEEDPATCH, FOREST, THICK FOREST, BLASTED TREE 

1840 DATA CORNER OF HOUSE,ENTRANCE TO KITCHEN, KITCHEN & GRIMY COOKER, SCULLERY DOOR 
1845 DATA ROOM WITH INCHES OF DUST,REAR TURRET ROOM,CLEARING RY HOUSE,PATH 

1860 DATA SIDE OF HOUSE,BACK OF HALLWAY, DARK ALCOVE,SMALL DARK ROOK 

1865 DATA BOTTON OF SPIRAL STAIRCASE,WIDE PASSAGE, SLIPPERY STEPS, CLIFFTOP 

1820 DATA NEAR CRUMELING WALL,SLOOMY PASSAGE,POOL OF LIGHT, IMPRESSIVE YAULTED HALLWAY 
1885 DATA HALL BY THICK WOODEN DOOR, TROPHY ROOM,CELLAR WITH BARRED WINDOW, CLIFF PATH 
1900 DATA CUPBOARD WITH HANGING COAT,FRONT HALL,SITTING ROOM, SECRET ROOH 

1905 DATA STEEP MARBLE STAIRS, DINING ROOM, DEEP CELLAR WITH COFFIN, CLIFF PATH 

1920 DATA CLOSET,FRONT LOBBY,LIBRARY OF EYIL BOOKS,STUDY WITH DESK & HOLE IN WALL 
1925 DATA WEIRD COBWEBBY ROOM, VERY COLD CHAMBER,SPOOKY ROOM,CLIFF PATH RY MARSH 
1940 DATA RUBBLE-STREWN VERANDAH, FRONT PORCH,FRONT TOWER,SLOPING CORRIDOR 

1945 DATA UPPER GALLERY,MARSH RY WALL,MARSH, SOGGY PATH 

1960 DATA BY THISTED RAILING,PATH THROUGH IRON GATE,BY RAILINGS, BENEATH FRONT TOWER 


1965 DATA DEBRIS FROM CRUMBLING FACADE,LARGE FALLEN BRICKWORK,ROTTING STONE ARCH, CRUMBLING 
CLIFFTOP 


- 
1980 FOR 1-0 10 63 matin <P 












Notice that data items 
are separated by 
commas. If you change 
the data, make sure you 
don'ttry to include 
commas init or you will 
confuse the computer. 


1990 READD${1) 







2000 





Ca 
HEXT I 

2010 DATAPAINTING, RING, MAGIC eaacnerMeeeb aca 

2012 DATAMATCHES, VACUUM, BATTERIES, SHOVEL, AXE, ROPE, BOAT, AEROSOL, CANDLE, KEY 


2014 DATANORTH, SOUTH, WEST, EAST, UP, DOWN 








2016 DATADOOR, BATS, GHOSTS, DRAWER, DESK, COAT, RUBBISH Make sure you type the 
2018 DATACOFFIN, BOOKS, XZANFAR, WALL, SPELLS ere me Coizect order 

7 or strange things wi 
2080 FOR I=! oe happen when youtry to 
2078 READOE(T) play the game. 


2086 NEXT I 
2090 FUQ)=LsF (L7)=2F (2)=LsF (26)=23F (28) =12F (23) =13LL=60; RM=57s M$= "0K" 
2100 RETURN 


VIC and Oric changes 
If you have a VIC 20 or an Oric, use these lines instead of line 460 in the mainlisting. 
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SPECTRUM VERSION 


Changes for the Spectrum (Timex 2000) 


Sinclair (Timex) computers use a version of Use the lines listed below to replace lines 
BASIC which differs quite a lot fromthe inthe main program and also change the 
BASIC on other popular computers, so you main program as follows: 
will have to make quite a lot of changes to 1. The Spectrum needs LET every time you 
make it work. These changes make the assign a value toa variable e.g. LET V=25. 
program slightly too long to fit into a 16K This affects many lines, including all the 
Spectrum. You could, however, try ones containing IF... THEN, so be careful. 
adapting the program to fit by cutting out 2. Allthe string data in lines 1660, 1665, 
some of the verbs, for example, and 1710-1780, 1820-1965 and 2010-2018 must be 
shortening the messages. put in quotes, like this: 
1820DATA“DARK CORNER”, 
40 LETF#=" i “OVERGROWN GARDEN” etc. 
126 PRINT DE (RM+1) 3. In lines 1790 and 1980, change the loop to 
440 FOR T=1 TO LEN(RE(RMHL)) read FOR I=1 TO 64. (The Spectrum won't 
150 PRINT RE(RMHL) (1 TO 105%," allow you to use the box labelled zero inan 
240 LET XS="":LET WS="":LET YB=O:LET OB=0 array.) 


FOR T=1 TO LEN(Q$)-1 
0 IF Q$(1 TO T)=* " AND X$="" THEN LET X$=08{ TO I-1) 

270 TF O8(T+1 TO L41)<5" " AND X$="" THEN LET W8=O$(1+1 TO)sLET I=LEN(Q$)-1 
F WS="" THEN LET X$=0¢ 

STF LEN(4$) > LEN(V$(1)) OR X$="" THEN GOTO 325 
& LET Y$=X$+F$( TO (LEN(Y$(1))-LEN(X$))) 


310 TF X$=V8(1) THEN LET YB=I ae stiacieh nari 
5 <an y ( zq and “go west” are the same thing. It is 
SIF W8="" OR LEN(WS) SLEN(O$(1)) THEN GOTO 240 best to keep the caps lock on all the 


LET WS=W$+F$( TO (LEN(O$(1))-LEN(W$))) time. 7 
5 IF OB=@ THEN BOTC420 fis 
Q TF F(28)=1 AND RM=13 AND INT(RNDES+1)¢53 AND VE <o21 THEN LET N$="BATS ATTACKING" 7 


FORN=44 AND INT(RNDS2)=1 AND F(24)<>1 THEN LET F(27)=1 LS 
GIF Fi20;=1 THEN LET LL=LL-1 ee ! 
SO TF LLCTTHEN LET Fi20)=0 


SUB SOOH(VBS1L) 45708 (VB52 AND VRCLOI+9R0R (VB=10 OR VB=11)+10308(VB=12) 41 
4p +11BG8 (VR=15) 412208 (VBE 16) +1 2508 (YR=17) +1 (YR=18) +1 3408 (VB=19) 
00 ZU) +1 4308 (YE=22) +1404 (VB=23) +1 4908 (YR=24) 15108 (UR=25) 415908 (VE=26) 
OIF (RM=26 AND F( G) AND (ist OR D=4) THEN LET N$="YOU NEED A LIGHT": RETURN 
BAG TF CRMO25 AND RMC3O) AND F(20}=0 THEN LET M#="TOO DARK TO MOVE": RETURN 
850 LET F(35)=0:LET RL=LEN(RE(RM#1)) 

(i i} 121) 



























Remember that if you type in the data 
in capital letters, you must play the 
game using capitals - the computer 
does not recognize that “GO WEST” 




























OF(YB=20) + 


1 





TF C(2)=1 AND RI 
M+1i="NSE* 


1280 IF OB=13 AND C(13)}=1 AND RN=43 THEN LET RE(RM+Li="WN"SLET DS(RM+1)="STUDY WITH SECRE 
T ROOM*:LET Mé="YQu THE THIN WALL" 


7 AND CO7)=1 AND C(9)=1 AND C(S)=1 THEN LET M$="IT CASTS A FLICKERING LIGHT" 


THEN LET M$="DUG THE BARS QUT"SLET DS(RM#1)="HOLE IN WALL":LET 








R 





4 
$ 
i 











IF F¢20}=1 THEN LET F(20)=0;LET M$="EXTINGUISHED” 

G TF RM=28 AND OB=25 AND F(25)=0 AND C(1Q)-1 THEN LET F(2S)=1:LET RS(RM+1)="SEW"SLET D 
S(RMHI)="HUGE OPEN DOOR":LET M$="THE KEY TURNS!" 

1600 DIM REC64, 4): DIM D8(H4, 4): DIM O8 (CH, 13):DIK ¥$(Y,9) 


ZX81 (Timex 1000) version 


The program listing on the next six pages is 
aspecial version of Haunted House for the 
ZX81. It sticks as closely as possible tothe 
structure of the main program, so youcan 
follow the explanations of the program 
given throughout this book. The main 


Notice that the locations are 
numbered starting with 1, as 
the ZX81 will not allow youto 
use the zero box in an array. 


ZX81 masterplan 


1 2 


ENTRANCE KITCHEN 
TO KITCHEN 





3 
SCULLERY 














7 
BACK OF 










SMALL 
ROOM 
WITH 
RUBBISH 











POOL OF 
LIGHT 


HALLWAY 
TO REAR 





















differences are that the ZX81 willaccept 
only one statement on each line and it does 
not have the commands READ...DATA. 
The program has been rewritten to take 
account of these and other differences in 
the BASIC which you will see pointed out on 
the listing. 

These changes take up quite a lot of 
memory space. In order to make the game 
fit, the number of locations has 
been cut from 64 to 36 and other data 
changed slightly to fit with this. The ZX81 
version of the master plan is shown below. 
You can find out how the data is put intothe 
computer's memory over the page. 















6 
CLOSET 
WITH 

COAT 









10 


SPIRAL 
STAIRCASE 


Ta 


SLIPPERY 
STEPS 




















DINING 
ROOM 












COBWEBBY 
ROOM 
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DESCRIPTION & FEEDBACK 


INPUT & INPUT ANALYSIS 


40 





2X81 LISTING 
How to use the program 


If you look through this listing, you will 
notice that the data for the game is not 
incorporated in the program. The program 
works by asking you to type in the data and 
then saving the whole program, including 
the data, on tape. You only need dothis 
once — next time you want to play the game, 
all you have to dois load the tape. 

Follow these instructions to use the 
program: 
1. Type in the program (very carefully). 
2. Type RUN 2440. 


19 GOSUB 2200 


20 CLS 
30 PRINT "HAUNTED HOUSE ADVENTURE" 
AO PRINT tees eee ee ' 


SQ PRINT "YOUR LOCATION: " 
60 PRINT D${RM) 

70 PRINT "EXITS:" 

80 FOR I=1 TO LEN(RS{RM)} 
90 PRINT RS(RM)(T TO T)5","5 
100 NEXT I 

110 PRINT 

120 FOR I=1 10 6 


140 NEXT I 

150 PRINT “=== 
180 PRINT M$ 
170 LET MS="WHAT 2" 

180 PRINT "WHAT WILL YOU DD NOW"; 
190 INPUT Q$ 

200 LET Xg="* 

210 LET Wg="" 

220 LET VB=0 

230 LET O2=0 

240 FOR I=1 TO LEN{O$)-1 





270 IF W$<>"" THEN LET I=LEN(Q$)-! 
280 NEXT I 
290 IF W$="" THEN LET X$=0¢ 


310 LET F=LEN(V$(1))-LEN(X$) 
320 LET X$=X$+F$(T0 F) 

330 FOR I=1 10 V 

340 IF X$=V$(1) THEN LET VB=I 
350 NEXT I 


cn) 


ou 


250 IF O${1 TO 1)=" "" AND X$="" THEN LET X$=@8/(T0 I-1) 
260 IF Q${I+t TO I+1)¢>" " AND X$¢3"" THEN LET WS=Q8{1+1 TO) 


300 IF LEN(X$) SLEN(V$(1)) OR X$="" THEN GOTO 420 { 


3. Now type in the data in the following 

order (see page 45 for lists of data): 

a) location descriptions 

b) routes 

c) object words 

d) verbs 

The program stops after each section so 
you can re-enter any data which you put 
inincorrectly. If, for instance, you want to 
put the verb data in again, type GOTO 
2720. If you want to carry on to the next 
input section, type CONT, followed by 
NEWLINE. 

4. Now SAVE the program on tape. This will 
save all the data as well. 

5. To start the game, type GOTO 10. DO 
NOT TYPE RUN, as this will destroy all 
the variables. 

6. Now input the starting positions of the 
objects. When you input the last of these 
(18) the program will give you your 
starting location. 

7. For anew game, repeat steps 5 and 6. 

8. When you load the program from tape, 
start these instructions at step 5. 


130 IF L(T)=RM AND F{1)=0 THEN PRINT "YOU CAN SEE "s0$(1);" HERE" 













The ZX81 needs LET whena 
value is assigned to a variable. 






This section looks a bit 
different to the main program 





MID$, LEFT$ and RIGHTS to 
take a section of a string. 









360 IF WS="" OR LEN(W$) SLEN(O$(1)) THEN GOTO 430 


because the ZX81 does not use 


ERROR MESSAGES 
OVERRIDE CONDITIONS 


BRANCH TO 
SUBROUTINES 


VERB 1 


VERB 2 


VERBS 3-9 
































370 LET F=LEN(O8(1))-LEN(WS) 

380 LET WS=WS+FS(TO F) 

390 FOR I=1 10 # 

400 IF WS=08(1) THEN LET OB=I 

410 NEXT I 

420 IF WS)"* AND OB=0 THEN LET NS="THATS SILLY" 















Notice that some of the 
program lines are longer than 
the printed lines on the page. 


430 IF VB=0 THEN LET YB=V+l! Make sure you don't press 
440 IF WS="" THEN LET MS="I NEED THO WORDS" NEWLINE before the end of 
the program line. 


450 IF VB>Y AND OBDO THEN LET MS="YOU CANT "#28 

460 IF YB>Y AND OB=0 THEN LET MS="VOU DONT MAKE SENSE* 
470 IF OB=0 OR OB>6 THEN GOTO 490 

480 IF VB<V AND OBD0 AND C(OB)=0 THEN LET M8="YOU DONT HAVE "+¥$ 
490 IF F(26)=0 OR RNG2S OR INT{RND#3)=2 OR YB=21 THEN GOTO 520 
500 LET MS="BATS ATTACKING” 

510 GOTO 20 

520 IF RM=28 AND INT(RND#2)=1 AND F(24)=0 THEN LET F(27)=1 

530 IF F(20)=1 THEN LET LL=LL-1 

540 IF LLG1 THEN LET F(20)=0 

550 GOSUB 590#(YB=1) +4408 (VB=2)+730#(VB)2 AND VBC10)+11608(VB=10 OR VBF11)+1270#(VB=12) 
#13508 (VB213) +14408 (VB=14) 414808 (VB=15) +1540 (VB=16) +1504 (VB=17) +16408(V B=1B) +1700" (VB=19) 
#17608 (YB=20) #18004 (YB=21) #18508 (VB=22) +19208(VB=23) +1990# (VB=24) +20408 (VB=25) #21908 (VB=26) 
S60 IF LL=10 THEN LET MS="YOUR CANDLE IS WANING" ae 

570 IF LL=1 THEN LET N$="YOUR CANDLE 1S QUT" 
580 GOTO 20 

590 PRINT "WORDS I KNOH" 

600 FOR I=1 TOY 

610 PRINT VEC", "4 

620 NEXT I 

630 LET Mé="" 

640 GOSUB 2160 

650 RETURN 

G0 PRINT "YOU ARE CARRYING: 
670 FOR I=1 70 6 

680 IF Cll)=1 THEN PRINT O$(1)5","s 

690 NEXT I 

700 LET MS=** 

710 BOSUB 2160 

720 RETURN 

730 LET D0 

740 IF OB=0 THEN LET D=¥B-3 

750 IF OB18 AND OB(25 THEN LET D=OB-18 

760 IF RM=10 AND D=5 THEN LET D=1 

770 IF RM=10 AND D=6 THEN LET D=3 

780 IF RM=12 AND D=6 THEN LET D=2 EN 
790 IF RM=12 AND D=5 THEN LET D=3 : 

B00 IF RM=22 AND D=b THEN LET D=t 
810 IF RM=22 AND D=5 THEN LET D=2 
B20 IF RNC332 OR Dé>3 THEN GOTO 850 
830 LET M$="ITS & LONG DROP" 4] 





VON 


oe 
















This line replaces the ON 
GOSUB line, which the ZX81 
can't do. It works like one long 
calculation, using the value of 
VB. The computer looks at 
each of the brackets containing 
“VB=" and putsa lifthe 
bracket is true and a zero ifit 
isn't. Try working through the 
calculation using a particular 
value of VB to see how it works. 













This replaces the tree section 
inthe main program. Check 

the plan if you want to see what 
location 32 is. 





2X81 LISTING 


840 RETURN 

850 IF F(27)=0 OR RM<>34 THEN GOTO 890 

860 LET M$="GHOSTS WILL NOT LET YOU MOVE" 

870 RETURN 

880 IF RM¢>29 OR C(1)=0 OR F(34)=1 THEN GOTO 910 
890 LET N$="NABICAL BARRIER TO THE WEST" 

900 RETURN 

910 IF RMC14 OR RMD17 OR F(20)=1 THEN GOTO 950 
920 IF RN=14 AND D<>1 AND D<>4 THEN GOTO 950 
930 LET M$="TO0 DARK TO MOVE" 

940 RETURN 

950 IF C{15)=0 OR RN(>36 THEN GOTO 980 

960 LET M$="THE BOAT IS TOO HEAVY" 


990 LET QH=RM 

1000 FOR I=1 TO RL 

1010 LET US=R$(RM) (I TO I) 

1020 IF US="N" AND D=1 THEN LET OM=OM-4 
1030 IF U$="S" AND D=2 THEN LET OM=OM+4 
1040 IF US="W" AND D=3 THEN LET OM=ON-! 
1050 IF US="—E" AND D=4 THEN LET ON=OM+! 

1060 NEXT I 

1070 LET M$="0K" 

1080 IF RM=OM THEN LET M$="CANT 60 THAT WAY" 
1090 LET RM=OM 

1100 IF D¢1 THEN LET M$="G0 WHERE ?* 

1110 TF RMC>25 OR F(23)=0 THEN GOTO 1150 
1120 LET R$(31)="" 

1150 LET M$="THE DOOR SLAMS SHUT BEHIND YOU" 
1140 LET F(23)=0 

4150 RETURN 

1160 IF OB>0 AND OB<=6 THEN GOTO 1190 

1170 LET M$="YOU CANT GET "+W$ 

1180 RETURN 

1190 IF L(OB)<ORM THEN LET M$="ITS NOT HERE" 
1200 IF F(OB)=1 THEN LET M$="WHAT “+HS+" 7" 
1210 IF C(OB)=1 THEN LET M$="YOU ALREADY HAVE IT” 
1220 IF L{OB)<2RM OR F(GB)=1 THEN GOTO 1240 
1230 LET C(OB)=1 

1240 LET M$="YOU HAVE THE "+¥$ 

1250 LET L(OB)=37 

1260 RETURN 





VERBS 10 & 11 


1280 LET M$="DRAWER OPEN" 
1290 LET F(17)=0 





& 
970 RETURN i 
980 LET RL=LEN(RS (RH) ) 


1270 IF RM<>27 OR (OB¢>28 AND OB4>29) THEN GOTO 130 


, £0 
1300 IF RM=16 AND OB=25 THEN LET M$="IT IS LOCKED" 

1310 IF RN¢>24 OR OB4>32 THEN GOTO 1340 & 

1320 LET M$="CREEPY" 


Check each line before you 
press NEWLINE. It is much 
easier to try and spot your 
mistakes as you type than 
having to search through the 
whole listing to find them. 













See pages 24-25 for 
more about how the 
subroutines work. 










Imagine your adventure is 
going to be sold ina famous 
chain of shops and design 
and write an atmospheric 
insert for its cassette box. 























































ae ce ele Check the two versions of 
340 RETURN Haunted House against each 
1350 IF OB(>30 THEN GOTO 1380 other to see where the 


1360 LET M$="SOMETHING HERE" programs differ. 


1370 LET F(18)=0 
1380 IF OB=28 OR OB=29 THEN LET N$="THERE IS A DRAWER" 
1390 IF OB=33 OR OB=5 THEN GOSUB 1440 

1400 IF RM=27 AND OB=35 THEN LET M$="SOMETHING BEYOND" 
1410 IF OB=32 THEN GOSUB 1270 

1420 IF RM=9 AND OB=31 THEN LET N$="THATS DISGUSTING" 
430 RETURN 

1440 IF RH=26 AND OB=33 THEN LET M$="THEY ARE DEMONIC WORKS" 
1450 IF (OB=3 OR OB=34) AND C{3)=1 AND F(34)=0 THEN LET M$="USE 
THIS WORD WITH CARE - XZANFAR® 

1460 IF C(S)=1 AND OB=S THEN LET M$="AN ALIEN TONGUE” 
1470 RETURN 

1480 LET M$="0K "+H$ 

1490 IF C(3)=0 OR OB¢>34 THEN GOTO 1520 

1500 LET M$="MAGIC OCCURS" 

1510 IF RMC229 THEN LET RN=INT(RND#36) +1 

1520 IF C(3)=1 AND OB=34 AND RM=29 THEN LET F(34)=1 
530 RETURN 

1540 IF C(12)=1 THEN LET M$="YOU HAVE MADE A HOLE" 
550 RETURN 

1560 IF C(14)4>1 AND RM=11 THEN LET M$="THIS IS NO TIME FOR GAMES” 
1570 IF OB=14 AND C414)=1 THEN LET M$="YOU SWUNG IT" 

1580 IF OB=13 AND C(13)=1 THEN LET M$="WHOOSH" 

1590 IF OB¢>13 OR C413)=0 OR RM¢>27 THEN GOTO 1630 

1600 LET R${RM)="2N" 

1610 LET DS(RM)="STUDY WITH SECRET ROOM" 

1620 LET N$="YOU BROKE THROUGH" 

630 RETURN 

1640 IF RMS>32 OR C(14)4>1 OR OBC>14 THEN GOTO 1680 

1650 LET M$="GOING DOWN” 

1660 LET RN=RM-1 

1670 GOTO 1690 

1680 LET M$="WHERE TO ?" 

690 RETURN 

1700 IF OB=17 AND C(17)=1 AND C(8)=0 THEN LET M$="IT WILL BURN YOUR HANDS" 

1710 IF OB=17 AND C(17)=1 AND C(9)=0 THEN LET M$="HHAT WITH 2° 

1720 IF OB<}17 OR C(17)=0 OR C(9)=0 OR C{B)=0 THEN GOTO 1750 

1730 LET M$="IT CASTS A FLICKERING LIGHT" . 
1740 LET F(20)=1 fo 
750 RETURN 

1760 IF F{20)=0 THEN GOTO 1790 
1770 LET M$="EXTINGUISHED" 
1780 LET F(20)=0 

790 RETURN 

1800 IF OB=26 AND C(16)=1 THEN LET M$="HISSSS" 





VERB 13 


VERB 14 












Don't forget, youcan add 
extra verbs without adding 
extra subroutines. You 
could add LOOK for 
example and make it use 
the EXAMINE subroutine. 





VERB 15 


16 


VERB 17 


VERB 18 


VERB 19 










Perhaps you can 
think of a better verb 
than “unlight”. 


VERB 20 


43 





VERB 22 


VERB 23 


oS 











VERB 24 





VERB 25 





INITIALIZATION 


2X81 LISTING 


1810 IF OB(>26 OR €(16)<>1 OR F(26)=0 THEN GOTO 1840 
1820 LET M$="PFFT - GOT THEM" 


ie aa Lines 2300 to 2350 set the fl 
ines .) set the flags 

840 RETURN for the invisible objects, so you 

1850 IF OBC>10 OR C(10)=0 OR C(11)=0 THEN GOTO 1910 do not need to type in flag data 


1860 LET F(24)=1 separately. 
1870 LET M$="SWITCHED ON" : 

1880 IF F(27)=0 OR F(24)=0 THEN GOTO 1910 

1890 LET M$="YOU VACUUMED THEM UP™ 

1900 LET F(27)=0 

910 RETURN 

1920 IF RM=27 AND (0B=27 OR OB=28) THEN GOSUB 1270 
1930 IF RMC>16 OR OBC>25 OR F(25)=1 OR C(18)=0 THEN GOTO 1980 
1940 LET F(25)=1 

1950 LET M$="THE KEY TURNS - CLUNK* 
1960 LET RS(RM)="SEW" 

1970 LET DS(RM)="HUGE OPEN DOOR" 
980 RETURN 

1990 IF C(OB)=0 THEN G0T0 2030 

2000 LET C(OB)=0 

2010 LET M$="DONE" 

2020 LET L{0B)=RM 

2030 RETURN 

2040 LET S=0 

2050 FOR I=1 10 6 

2060 IF C(1)=1 THEN LET S=5+1 

2070 NEXT I \ 

2080 IF S=17 AND C(15)=0 AND RM¢>31 THEN PRINT "YOU HAVE EVERYTHING 

RETURN TO PORCH FOR FINAL SCORE" 

2090 IF S<>17 OR RM¢>31 THEN GOTO 2120 | 
2100 PRINT "DOUBLE SCORE" 

2110 LET 5=S#2 

2120 PRINT "YOUR SCORE “3S 

2130 IF S<18 THEN GOTO 2160 

2140 PRINT "WELL DONE - YOU HAVE FINISHED" 

2150 STOP 

2160 PRINT "PRESS NEW LINE TO CONTINUE" 

2170 INPUT 8 






















When you DIMensiona string 
array on the ZX81, youneed to 
tell the computer the length of 
the longest item you are going 
to store init. The computer then 
reserves 36 (or however many) 
spaces of this length. This 
wastes memory space if you 
have one item which is much 
longer than all the others. 


2180 LET M$="0K" / 
2190 RETURN \, 3/9 

2200 FOR I=1 TO W j 

2210 LET FA1)=0 ca) 








2220 LET C(I)=0 
2230 NEXT I 

2240 LET RS(31)="N" 
2250 LET R$(27)="#" 
2260 LET R$(16)="WE" \ 

2270 LET D$(27)="STUDY, DESK AND WALL” lt 
2280 LET D$(16)="HALL WITH HUGE WOODEN DOOR" 





Lines 2240 to 2380 reset the 
variables which have been 
changed during a game, so that 
youcan play anew game. 





DATA INPUT SECTION 





2290 LET M$="0K" 
2300 LET F(18)=1 
2310 LET F(17)=1 
2320 LET F(27)=1 
2330 LET F(2)=1 
2340 LET F(26)=1 
2350 LET F(23)=1 
2360 LET LL=60 
2370 LET RN=31 

2380 LET F$=" a . 
2390 FOR I=1 10 6 

2400 PRINT I 

2410 INPUT L{I) 


| 2420 NEXT I 


2430 RETURN 

2440 DIM R$(36,4) 
2450 DIM D$(36,30) 
2460 LET Y=25 
2470 DIM V${V,9) 
2480 LET W=36 
2490 DIM O$(W, 13) 
2500 DIM C(W) 

2510 DIM F(W) 


2590 STOP 

2600 PRINT "ROUTES" 
2610 FOR I=1 TO 34 
2620 PRINT | 

2630 INPUT R${(I) 
2640 NEXT I 

2650 STOP 

2660 PRINT "OBJECTS" 
2670 FOR I=! TOW 
2680 PRINT I 

2690 INPUT O$(1) 
2700 NEXT I 

2710 STOP 

2720 PRINT "VERBS" 
2730 FOR I=1 10 ¥ 
2740 PRINT I 

2750 INPUT V${I) 
2760 NEXT I 

2770 STOP 


13 SPACES | HALLWAY TO REAR, POOL OF LIGHT, VAULTED 





The data: Load the data in this order. (See page 40.) 


DESCRIPTIONS \' 


Se 
ENTRANCE TO KITCHEN, KITCHEN WITH GRIMY 
COOKER, SCULLERY, DUSTY ROOM, REAR TURRET 
ROOM, CLOSET WITH COAT, BACK HALLWAY, DARK 
ALCOVE, SMALL ROOM WITH RUBBISH, SPIRAL 
STAIRCASE, WIDE PASSAGE, SLIPPERY STEPS, 





me at i 


HALL, HALL WITH HUGE WOODEN DOOR, TROPHY | 
ROOM, CELLAR ROOM, FRONT HALL, SITTING te 

ROOM, SECRET ROOM, STEEP MARBLE STAIRS, H 

DINING ROOM, VAULT WITH COFFIN, FRONT LOBBY, 
LIBRARY OF EVIL BOOKS, STUDY WITH DESK. HOLE #4 
IN WALL, COBWEBBY ROOM, VERY COLD CHAMBER, | 
SPOOKY ROOM, FRONT PORCH, TOP OF FRONT | 
TOWER, SLOPING CORRIDOR, UPPER GALLERY, 

BOAT HOUSE. SOGGY PATH 







The commas show 
where you should press 

NEWLINE between data 
items. DON’T TYPE THE 





SE, WE, W, SE, WE, W, 

NS, SE, WE, NWUD, SE, SWUD, 
NS, NSE, WE, WE, NSW, NS, 
NSE, NSW, S, NSUD, N,N, 

N, NE, W, NSE, WE, SW, 
N, WE, WE, NW, E, NW » 


OBJECTS OU ee 


PAINTING, RING, MAGIC SPELLS, GOBLET, SCROLL, 

COINS, STATUE, CANDLESTICK, MATCHES, 

VACUUM, BATTERIES, SHOVEL, AXE, ROPE, BOAT, } 

AEROSOL, CANDLE, KEY, NORTH, SOUTH, WEST, | 

EAST, UP, DOWN, DOOR, BATS, GHOSTS, DRAWER, 

DESK, COAT, RUBBISH, COFFIN, BOOKS, XZANFAR, i 

WALL, SPELLS i 
j 
4 










VERBS N E 


HELP, CARRYING?, GO, N, 5S, W,E, U, D, 

GET, TAKE, OPEN, EXAMINE, READ, SAY, 

DIG, SWING, CLIMB, LIGHT, UNLIGHT, SPRAY, 5| 
USE, UNLOCK, LEAVE, SCORE 4 


We oT teen nor acs aoe aN PNR HE, 
(You must type in this set of data each time yourun 
the program.) 

30, 24, 21, 32, 5, 8, 
16, 26, 2, 13, 14, 36, 
18, 11, 35, 3, 27,6 















ee Tw 





Extra tips and hints 


1. Use integer variables 


Onsome computers you can put a % sign 
after number variable names to show that 
you only want to put integers or whole 
numbers in them (numbers without 
anything to the right of the decimal point 
that is). So variable V becomes V% and so 
on. You can do this on the BBC, TRS-80, 
Dragon, TRS-Color and Oric. It is useful to 
do this because it saves memory space and 
increases the speed by as muchas 50%. 
The speed is particularly noticeable when 
the computer is executing long loops. 





Think about screen presentation 


If you have enough spare memory, you 
could improve the way the game looks on 
the screen. You could add a graphics 
routine for the opening title for instance and 
make the text flash on and off at particular 
points in the game, such as when the candle 
flickers or the ghosts appear. The textneed 
not be printed at the edge of the screen, nor 
need it all be the same colour. Youcould 
make use of coloured borders and 
backgrounds too. 


3. Watch your spelling 


If you are not quite sure how to spell a word 
you want to use inthe game, check itina 
dictionary. Your computer doesn’t know 
how to spell and will store whatever youtell 
itin its memory. This could be very 
frustrating for the player who is using the 
correct version and keeps getting error 
messages because the computer doesn't 
recognize the word. 


4. Spread the action 


Some adventure games are a bit boring to 
play because everything happens inthe 
same place. Try to make sure there are 


46 interesting things all through the game. 


5. Use REM statements 


When you are writing a program as long 
and complicated as an adventure, itisa 
very good idea to put REM statements in 
front of each section. You are quite likely to 
get confused as to which section is which if 
you don’t. When you have finished the 
program, though, take the REMs out - they 
take up memory space, slow the program 
up and allow unscrupulous players to cheat. 


6. Use helpful variable names 


Try to name your variables so that it iseasy 
to remember what each one is e.g. OB for 
objects, MK for mistakes, and so on. If you 
have plenty of memory space and your 
computer will allow you, it isa good ideato 
use long variable names to help you 
remember what each variable is, e.g. 
instead of V use VERB. Make alist of your 
variables and what they are anyway, so you 
don't mix them up while you are writing the 
program. 


7. Keep it simple 


Don't be too ambitious with your first 
games. A simple, well-thought-out game 
will be more fun to play than a confused, 
complicated one. Not everyone wants to 
play a game which goes on for days. 


8. Keep it friendly 


When you have written your game, look at 
the comments to make sure they are not 
ambiguous or misleading. Instead of “TOO 
DARK’, for instance, you could say “YOU 
NEED A LIGHT TO GO HERE”. Remember, 
something that is obvious to you will not be 
at all obvious to a player. Make some of 
your comments funny too as this will help 
the player feel the computer is really talking 
to him. 


Answers to puzzles 


Detective game puzzle (page 13) 
Here are some suggested solutions for the problems in the detective game. See how 
they compare with the solutions you thought of. 


1. You will only see the hair if you instruct computer to examine coat. You cannottake 
hair unless you have a clean envelope to putitin. 


2. Youneed a key to open the drawer, a magnifying glass to see the thread and asecond 
clean envelope to putitin. 


3. You need plaster and a container of water to make a plaster cast of the footprint. 


4. You need talcum powder to show up prints and sticky tape to lift print off surfaceto 
take away. 


5. You need a portable blood analysis kit (described in game as a box containing bottles 
and other scientific equipment). 


6. You need a handkerchief to pick up the stick and a polythene bag to carry itin. 


Adventure brain teasers (page 15) 
Remember there are no “correct” answers to these puzzles. Here are some suggested 
solutions. 


1. Lift the carpet and find a trap door. 


2. Use the handkerchief as a mask (assuming drowsiness is caused by a gas inthe 
room), look inside rucksack and find a flask. Open the flask and find black coffee. 
Drink coffee. 


3. Read scroll (which is a proclamation to free the slaves). 


4. Throw the dessert (which happens to be custard pie) in the arch-villain’s face. Grab 
the remote control and escape. 


Puzzle (page 28) 
Here is how you can change the program to limit the number of objects that canbe 
carried at one time. 

You need two new variables, here they are called CO (which stands for “carried 
objects”) and CL (which stands for “carrying limit”). Add these to the end of line 70 like 
this: 
70...:CO=0:CL=8 

You then need to tell the computer to add one to CO in the GET routine whenthe 
player picks up an object and subtract one from it inthe LEAVE routine if he dropsan 
object. Do this by adding to the ends of lines, 1010 and 1490 like this: 
1010...:CO=CO+1 
1490...:CO=CO-1 

Now add anew line to the GET routine to check if CO equals the limit before 
proceeding with the rest of the routine. 

(CL need not be 8, but it cannot be less or the player would not be able to carry allthe 
treasures to the finish.) 


Going further 

Once you have written an adventure, you could join the BBC Micro Adventure/Fantasy 
Club. This is a postal club and it provides a library of adventure and fantasy gameswritten 
by members for the use of other members. To find out more, write to: 

BBC Micro Adventure Club, 29 Blackthorne Drive, Larkfield, Kent ME20 6NR, England. 
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mistakes, correcting, 32 
no match, 22 
number arrays, 17 
numbering of locations, 8 
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program 
changing the, 28-32 
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REM statements, 46 


one-way, 8,9 
routes array, 17, 18, 20,31 
tules, 3 
saving the game, 30, 31 
SCORE, 3 
subroutine, 30, 36, 44 
scoring,-10, 30 
screen presentation, 46 
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18, 21, 33, 38, 40 
single-letter commands, 26 
sketch map, 6 
sounds, 29 
Spectrum, 3, 29, 33 
version, 38 
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Stanford University, 4 
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word not found in memory, 16 
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writing the program, 19, 20, 21, 
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